Mercurial > emacs

diff lisp/textmodes/flyspell.el @ 77381:b2648f8ce834

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(flyspell-define-abbrev): Downcase abbrev before defining it.
author Glenn Morris <rgm@gnu.org>
date Sun, 22 Apr 2007 00:19:37 +0000
parents c5ea5d1e6950
children 7be6bca439a5 e6fdae9180d4
line wrap: on
line diff
--- a/lisp/textmodes/flyspell.el	Sat Apr 21 22:00:45 2007 +0000
+++ b/lisp/textmodes/flyspell.el	Sun Apr 22 00:19:37 2007 +0000
@@ -1827,7 +1827,7 @@
 (defun flyspell-define-abbrev (name expansion)
   (let ((table (flyspell-abbrev-table)))
     (when table
-      (define-abbrev table name expansion))))
+      (define-abbrev table (downcase name) expansion))))
 
 ;;*---------------------------------------------------------------------*/
 ;;*    flyspell-auto-correct-word ...                                   */