# HG changeset patch
# User Agustin martin <agustin.martin@hispalinux.es>
# Date 1272364500 -7200
# Node ID 0c5ef72c7a9da69a1bb476a032f4baaa0530a939
# Parent  4e52ea307c2dc965debf4164491392c6b6bd7411
ispell.el (ispell-init-process): Fix personal dictionary condition in default directory check.

diff -r 4e52ea307c2d -r 0c5ef72c7a9d lisp/textmodes/ispell.el
--- 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.