# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1140172967 0
# Node ID d73d40422cca817396d86d9992a6dc5c13ab1cd6
# Parent  85f92eabec4d971adddcfb93ce0027bc16a8625d
(ispell-change-dictionary):  Call ispell-buffer-local-dict instead of
ispell-accept-buffer-local-defs.

diff -r 85f92eabec4d -r d73d40422cca lisp/textmodes/ispell.el
--- a/lisp/textmodes/ispell.el	Fri Feb 17 10:34:16 2006 +0000
+++ b/lisp/textmodes/ispell.el	Fri Feb 17 10:42:47 2006 +0000
@@ -2604,7 +2604,7 @@
 	       (mapcar 'list (ispell-valid-dictionary-list)))
 	  nil t)
 	 current-prefix-arg))
-  (unless arg (ispell-accept-buffer-local-defs))
+  (unless arg (ispell-buffer-local-dict))
   (if (equal dict "default") (setq dict nil))
   ;; This relies on completing-read's bug of returning "" for no match
   (cond ((equal dict "")