From: Eli Zaretskii <eliz@gnu.org>
Date: Fri, 17 Feb 2006 10:43:53 +0000 (+0000)
Subject: (ispell-change-dictionary):  Call ispell-buffer-local-dict instead of
X-Git-Tag: emacs-pretest-22.0.90~4077
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a2a385a7ab3e8936efeda645d4d4a6d1c674d8ea;p=emacs.git

(ispell-change-dictionary):  Call ispell-buffer-local-dict instead of
ispell-accept-buffer-local-defs.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index ccd78dd8644..ec4aa9f3048 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
+2006-02-17  Agustin Martin  <agustin.martin@hispalinux.es>
+
+	* textmodes/ispell.el (ispell-change-dictionary):  Call
+	ispell-buffer-local-dict instead of
+	ispell-accept-buffer-local-defs.
+
 2006-02-17  Nick Roberts  <nickrob@snap.net.nz>
 
 	* speedbar.el (speedbar-frame-width): Make an inline function
diff --git a/lisp/textmodes/ispell.el b/lisp/textmodes/ispell.el
index 3bf608c2cc0..ea112d6d877 100644
--- a/lisp/textmodes/ispell.el
+++ b/lisp/textmodes/ispell.el
@@ -2604,7 +2604,7 @@ By just answering RET you can find out what the current dictionary is."
 	       (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 "")