Mercurial > emacs
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 ... */