[Emacs-diffs] Changes to emacs/lisp/textmodes/ispell.el,v

[Glenn Morris]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Glenn Morris <gm>       07/12/02 18:17:08

Index: ispell.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/ispell.el,v
retrieving revision 1.216
retrieving revision 1.217
diff -u -b -r1.216 -r1.217
--- ispell.el   20 Nov 2007 00:40:35 -0000      1.216
+++ ispell.el   2 Dec 2007 18:17:08 -0000       1.217
@@ -981,7 +981,7 @@
                "[^[:alpha:]]"
                (regexp-opt otherchars)
                t                            ; We can't tell, so set this to t
-               (list "-d" dict-name "--encoding=utf-8")
+               (list "-d" dict-name)
                nil                             ; aspell doesn't support this
                ;; Here we specify the encoding to use while communicating with
                ;; aspell.  This doesn't apply to command line arguments, so
@@ -2511,6 +2511,13 @@
              (append args
                      (list "-p"
                            (expand-file-name 
ispell-current-personal-dictionary)))))
+    (if (and ispell-really-aspell
+            ispell-aspell-supports-utf8)
+       (setq args
+             (append args
+                     (list
+                      (concat "--encoding="
+                              (symbol-name (ispell-get-coding-system)))))))
     (setq args (append args ispell-extra-args))
 
     ;; Initially we don't know any buffer's local words.