changeset 77381:b2648f8ce834

(flyspell-define-abbrev): Downcase abbrev before defining it.
author Glenn Morris <rgm@gnu.org>
date Sun, 22 Apr 2007 00:19:37 +0000
parents 41633906d2e3
children 80b4497253f4
files lisp/textmodes/flyspell.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
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 ...                                   */