Re: [bug]org-mode with flyspell-mode freezes emacs

[martin rudalics]

Does it happen with the following?

(defun flyspell-word-search-backward (word bound)
  (save-excursion
    (let ((r '())
          p
          (oldp t))
      (while (and (not r) (setq p (search-backward word bound t)))
        (let ((lw (flyspell-get-word '())))
          (cond
           ((and (consp lw) (string-equal (car lw) word))
            (setq r p))
           ((equal p oldp)
            (setq r t))
           (t
            (setq oldp p)
            (goto-char p)))))
      r)))