andros/emacs-gpu
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(flyspell-define-abbrev): Downcase abbrev before defining it.

Browse source
This commit is contained in:
Glenn Morris 2007-04-22 00:22:14 +00:00
parent 33a9c08c34
commit 2aebf08d10
2 changed files with 6 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/ChangeLog
View file

@ -1,3 +1,8 @@
2007-04-22 Glenn Morris <rgm@gnu.org>
* textmodes/flyspell.el (flyspell-define-abbrev): Downcase abbrev
before defining it.
2007-04-21 Martin Rudalics <rudalics@gmx.at>
* progmodes/cc-mode.el

2
lisp/textmodes/flyspell.el
View file

@ -1827,7 +1827,7 @@ misspelled words backwards."
(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 ... */