[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] /srv/bzr/emacs/trunk r106228: * flyspell.el (flyspell-word
From: |
Chong Yidong |
Subject: |
[Emacs-diffs] /srv/bzr/emacs/trunk r106228: * flyspell.el (flyspell-word): Fix char offset for forged Ispell output. |
Date: |
Sat, 29 Oct 2011 12:37:29 +0800 |
User-agent: |
Bazaar (2.3.1) |
------------------------------------------------------------
revno: 106228
fixes bug(s): http://debbugs.gnu.org/7904
committer: Chong Yidong <address@hidden>
branch nick: trunk
timestamp: Sat 2011-10-29 12:37:29 +0800
message:
* flyspell.el (flyspell-word): Fix char offset for forged Ispell output.
modified:
lisp/ChangeLog
lisp/textmodes/flyspell.el
=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog 2011-10-29 03:42:12 +0000
+++ b/lisp/ChangeLog 2011-10-29 04:37:29 +0000
@@ -1,5 +1,8 @@
2011-10-29 Chong Yidong <address@hidden>
+ * textmodes/flyspell.el (flyspell-word): Fix char offset for
+ forged Ispell output (Bug#7904).
+
* emacs-lisp/package.el (package-refresh-contents): Add autoload.
2011-10-28 Stefan Monnier <address@hidden>
=== modified file 'lisp/textmodes/flyspell.el'
--- a/lisp/textmodes/flyspell.el 2011-10-20 00:26:14 +0000
+++ b/lisp/textmodes/flyspell.el 2011-10-29 04:37:29 +0000
@@ -1121,7 +1121,7 @@
(setq poss (ispell-parse-output (car ispell-filter)))))
;; Else, this was a known misspelling to begin with, and
;; we should forge an ispell return value.
- (setq poss (list word 0 '() '())))
+ (setq poss (list word 1 nil nil)))
(let ((res (cond ((eq poss t)
;; correct
(setq flyspell-word-cache-result t)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] /srv/bzr/emacs/trunk r106228: * flyspell.el (flyspell-word): Fix char offset for forged Ispell output.,
Chong Yidong <=