Mercurial > emacs
changeset 108138:0c5ef72c7a9d
ispell.el (ispell-init-process): Fix personal dictionary condition in default directory check.
| author | Agustin martin <agustin.martin@hispalinux.es> |
|---|---|
| date | Tue, 27 Apr 2010 12:35:00 +0200 |
| parents | 4e52ea307c2d |
| children | cded9fd7d5d0 |
| files | lisp/textmodes/ispell.el |
| diffstat | 1 files changed, 5 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/textmodes/ispell.el Tue Apr 27 01:11:11 2010 -0700 +++ b/lisp/textmodes/ispell.el Tue Apr 27 12:35:00 2010 +0200 @@ -2614,9 +2614,11 @@ "Check status of Ispell process and start if necessary." (if (and ispell-process (eq (ispell-process-status) 'run) - ;; If we're using a personal dictionary, ensure - ;; we're in the same default directory! - (or (not ispell-personal-dictionary) + ;; Unless we are using an explicit personal dictionary, + ;; ensure we're in the same default directory! + ;; Restart check for personal dictionary is done in + ;; `ispell-internal-change-dictionary', called from `ispell-buffer-local-dict' + (or (or ispell-local-pdict ispell-personal-dictionary) (equal ispell-process-directory default-directory))) (setq ispell-filter nil ispell-filter-continue nil) ;; may need to restart to select new personal dictionary.