--- ispell.el.0	2006-04-25 12:20:28.000000000 +0200
+++ ispell.el	2006-04-25 12:29:49.000000000 +0200
@@ -2577,7 +2577,7 @@
 	       (mapcar 'list (ispell-valid-dictionary-list)))
 	  nil t)
 	 current-prefix-arg))
-  (unless arg (ispell-buffer-local-dict t))
+  (unless arg (ispell-buffer-local-dict 'no-reload))
   (if (equal dict "default") (setq dict nil))
   ;; This relies on completing-read's bug of returning "" for no match
   (cond ((equal dict "")