Do these changes give good results? *** ispell.el 24 Sep 2005 22:42:55 -0400 1.177 --- ispell.el 03 Oct 2005 11:33:22 -0400 *************** *** 1558,1563 **** --- 1558,1564 ---- (interactive (list ispell-following-word ispell-quietly current-prefix-arg)) (if continue (ispell-continue) + (ispell-maybe-find-aspell-dictionaries) (ispell-accept-buffer-local-defs) ; use the correct dictionary (let ((cursor-location (point)) ; retain cursor location (word (ispell-get-word following)) *************** *** 2616,2621 **** --- 2617,2623 ---- Return nil if spell session is quit, otherwise returns shift offset amount for last line processed." (interactive "r") ; Don't flag errors on read-only bufs. + (ispell-maybe-find-aspell-dictionaries) (if (not recheckp) (ispell-accept-buffer-local-defs)) ; set up dictionary, local words, etc. (let ((skip-region-start (make-marker)) *************** *** 3577,3583 **** (defun ispell-accept-buffer-local-defs () "Load all buffer-local information, restarting Ispell when necessary." - (ispell-maybe-find-aspell-dictionaries) (ispell-buffer-local-dict) ; May kill ispell-process. (ispell-buffer-local-words) ; Will initialize ispell-process. (ispell-buffer-local-parsing)) --- 3579,3584 ---- *** flyspell.el 20 Sep 2005 19:31:14 -0400 1.76 --- flyspell.el 03 Oct 2005 11:34:03 -0400 *************** *** 536,541 **** --- 536,542 ---- ;*---------------------------------------------------------------------*/ (defun flyspell-mode-on () "Turn Flyspell mode on. Do not use this; use `flyspell-mode' instead." + (ispell-maybe-find-aspell-dictionaries) (setq ispell-highlight-face 'flyspell-incorrect) ;; local dictionaries setup (or ispell-local-dictionary ispell-dictionary
_______________________________________________ Emacs-devel mailing list Emacs-devel@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-devel