procyberian/emacs
2
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
Download patch file Download diff file Expand all files Collapse all files

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