[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs/lisp ChangeLog textmodes/flyspell.el
From: |
Glenn Morris |
Subject: |
[Emacs-diffs] emacs/lisp ChangeLog textmodes/flyspell.el |
Date: |
Sat, 17 Oct 2009 22:43:19 +0000 |
CVSROOT: /sources/emacs
Module name: emacs
Changes by: Glenn Morris <gm> 09/10/17 22:43:18
Modified files:
lisp : ChangeLog
lisp/textmodes : flyspell.el
Log message:
(flyspell-large-region, flyspell-word)
(flyspell-get-word, flyspell-large-region)
(flyspell-auto-correct-previous-word): Doc/error message fixes.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.16451&r2=1.16452
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/textmodes/flyspell.el?cvsroot=emacs&r1=1.149&r2=1.150
Patches:
Index: ChangeLog
===================================================================
RCS file: /sources/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.16451
retrieving revision 1.16452
diff -u -b -r1.16451 -r1.16452
--- ChangeLog 17 Oct 2009 14:28:44 -0000 1.16451
+++ ChangeLog 17 Oct 2009 22:43:13 -0000 1.16452
@@ -1,3 +1,9 @@
+2009-10-17 Glenn Morris <address@hidden>
+
+ * textmodes/flyspell.el (flyspell-large-region, flyspell-word)
+ (flyspell-get-word, flyspell-large-region)
+ (flyspell-auto-correct-previous-word): Doc/error message fixes.
+
2009-10-17 Chong Yidong <address@hidden>
* Makefile.in (ELCFILES): Add ede/shell.
Index: textmodes/flyspell.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/textmodes/flyspell.el,v
retrieving revision 1.149
retrieving revision 1.150
diff -u -b -r1.149 -r1.150
--- textmodes/flyspell.el 17 Oct 2009 03:09:53 -0000 1.149
+++ textmodes/flyspell.el 17 Oct 2009 22:43:18 -0000 1.150
@@ -242,7 +242,7 @@
Doubled words are not detected in a large region, because Ispell
does not check for them.
-If `flyspell-large-region' is nil, all regions are treated as small."
+If this variable is nil, all regions are treated as small."
:group 'flyspell
:version "21.1"
:type '(choice number (const :tag "All small" nil)))
@@ -1011,7 +1011,10 @@
;;* flyspell-word ... */
;;*---------------------------------------------------------------------*/
(defun flyspell-word (&optional following)
- "Spell check a word."
+ "Spell check a word.
+If the optional argument FOLLOWING, or, when called interactively
+`ispell-following-word', is non-nil, checks the following (rather
+than preceding) word when the cursor is not over a word."
(interactive (list ispell-following-word))
(ispell-set-spellchecker-params) ; Initialize variables and dicts alists
(save-excursion
@@ -1252,13 +1255,10 @@
;;*---------------------------------------------------------------------*/
(defun flyspell-get-word (&optional following extra-otherchars)
"Return the word for spell-checking according to Ispell syntax.
-If optional argument FOLLOWING is non-nil or if `flyspell-following-word'
-is non-nil when called interactively, then the following word
-\(rather than preceding\) is checked when the cursor is not over a word.
-Optional second argument contains otherchars that can be included in word
-many times.
-
-Word syntax described by `flyspell-dictionary-alist' (which see)."
+Optional argument FOLLOWING non-nil means to get the following
+\(rather than preceding) word when the cursor is not over a word.
+Optional second argument EXTRA-OTHERCHARS is a regexp of characters
+that may be included as part of a word (see `ispell-dictionary-alist')."
(let* ((flyspell-casechars (flyspell-get-casechars))
(flyspell-not-casechars (flyspell-get-not-casechars))
(ispell-otherchars (ispell-get-otherchars))
@@ -1560,7 +1560,7 @@
(flyspell-delete-region-overlays beg end)
(flyspell-check-region-doublons beg end))
(flyspell-external-point-words))
- (error "Can't check region...")))))
+ (error "Can't check region")))))
;;*---------------------------------------------------------------------*/
;;* flyspell-region ... */
@@ -1979,7 +1979,7 @@
;;* flyspell-auto-correct-previous-word ... */
;;*---------------------------------------------------------------------*/
(defun flyspell-auto-correct-previous-word (position)
- "Auto correct the first mispelled word that occurs before point.
+ "Auto correct the first misspelled word that occurs before point.
But don't look beyond what's visible on the screen."
(interactive "d")
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs/lisp ChangeLog textmodes/flyspell.el,
Glenn Morris <=