mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

Fix invocation of Hunspell by ispell.el.

Browse source 
lisp/textmodes/ispell.el (ispell-check-version): For hunspell, set
 ispell-encoding8-command to "-i", without a trailing space.
 (ispell-start-process): For hunspell, use '("-i" ENCODING), in 2
 separate command-line arguments, to specify the encoding, since
 that's how hunspell expects it.
This commit is contained in:
Eli Zaretskii 2012-04-08 20:09:03 +03:00
parent 3b747a14c7
commit b39bb7e124
2 changed files with 15 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

11
lisp/textmodes/ispell.el
View file

@ -874,7 +874,7 @@ Otherwise returns the library directory name, if that is defined."
(setq ispell-really-aspell nil)))
(ispell-really-hunspell
(if (ispell-check-minver hunspell8-minver ispell-really-hunspell)
(setq ispell-encoding8-command "-i ")
(setq ispell-encoding8-command "-i")
(setq ispell-really-hunspell nil))))))
result))
@ -2618,9 +2618,12 @@ Keeps argument list for future ispell invocations for no async support."
;; right encoding for communication. ispell or older aspell/hunspell
;; does not support this.
(if ispell-encoding8-command
(list
(concat ispell-encoding8-command
(symbol-name (ispell-get-coding-system)))))
(if ispell-really-hunspell
(list ispell-encoding8-command
(upcase (symbol-name (ispell-get-coding-system))))
(list
(concat ispell-encoding8-command
(symbol-name (ispell-get-coding-system))))))
ispell-extra-args)))
;; Initially we don't know any buffer's local words.