diff options
| -rw-r--r-- | lisp/ChangeLog | 6 | ||||
| -rw-r--r-- | lisp/textmodes/flyspell.el | 9 |
2 files changed, 11 insertions, 4 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index d4217ba1112..1f6b7d3dfaf 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2012-04-12 Agustín Martín Domingo <agustin.martin@hispalinux.es> | ||
| 2 | |||
| 3 | * textmodes/flyspell.el (flyspell-large-region): For hunspell, use | ||
| 4 | '("-i" ENCODING), in 2 separate command-line arguments, to specify | ||
| 5 | the encoding, as expected by hunspell. | ||
| 6 | |||
| 1 | 2012-04-12 Stefan Monnier <monnier@iro.umontreal.ca> | 7 | 2012-04-12 Stefan Monnier <monnier@iro.umontreal.ca> |
| 2 | 8 | ||
| 3 | * battery.el (battery--linux-sysfs-regexp): New const. | 9 | * battery.el (battery--linux-sysfs-regexp): New const. |
diff --git a/lisp/textmodes/flyspell.el b/lisp/textmodes/flyspell.el index 24967ded154..72a3eb474f8 100644 --- a/lisp/textmodes/flyspell.el +++ b/lisp/textmodes/flyspell.el | |||
| @@ -1576,10 +1576,11 @@ The buffer to mark them in is `flyspell-large-region-buffer'." | |||
| 1576 | (if ispell-encoding8-command | 1576 | (if ispell-encoding8-command |
| 1577 | (setq args | 1577 | (setq args |
| 1578 | (append args | 1578 | (append args |
| 1579 | (list | 1579 | (if ispell-really-hunspell |
| 1580 | (concat ispell-encoding8-command | 1580 | (list ispell-encoding8-command |
| 1581 | (symbol-name | 1581 | (upcase (symbol-name encoding))) |
| 1582 | encoding)))))) | 1582 | (list (concat ispell-encoding8-command |
| 1583 | (symbol-name encoding))))))) | ||
| 1583 | 1584 | ||
| 1584 | (let ((process-coding-system-alist (list (cons "\\.*" encoding)))) | 1585 | (let ((process-coding-system-alist (list (cons "\\.*" encoding)))) |
| 1585 | (setq c (apply 'ispell-call-process-region beg | 1586 | (setq c (apply 'ispell-call-process-region beg |