[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: flyspell and abbrev
From: |
Glenn Morris |
Subject: |
Re: flyspell and abbrev |
Date: |
Sat, 21 Apr 2007 19:57:47 -0400 |
User-agent: |
Gnus (www.gnus.org), GNU Emacs (www.gnu.org/software/emacs/) |
Richard Stallman wrote:
> I think this is an issue for aspell or ispell (whichever one you are
> using). Not for Emacs.
No, I think rather that flyspell should downcase abbrevs before
defining them, like define-mode-abbrev does.
Beyond that, given the way expand-abbrev treats case, does it make any
sense for define-abbrev to allow you to define an abbrev without
downcasing it? They don't seem to work at all, eg:
emacs -Q -f abbrev-mode
(define-abbrev lisp-mode-abbrev-table "FOO" "foobar")
FOO -> not expanded
foo -> not expanded
(define-abbrev lisp-mode-abbrev-table "bar" "foobar")
bar -> foobar
Bar -> Foobar
BAr -> Foobar
BAR -> FOOBAR
*** flyspell.el 06 Apr 2007 19:55:53 -0700 1.117
--- flyspell.el 21 Apr 2007 16:30:23 -0700
***************
*** 1827,1833 ****
(defun flyspell-define-abbrev (name expansion)
(let ((table (flyspell-abbrev-table)))
(when table
! (define-abbrev table name expansion))))
;;*---------------------------------------------------------------------*/
;;* flyspell-auto-correct-word ... */
--- 1827,1833 ----
(defun flyspell-define-abbrev (name expansion)
(let ((table (flyspell-abbrev-table)))
(when table
! (define-abbrev table (downcase name) expansion))))
;;*---------------------------------------------------------------------*/
;;* flyspell-auto-correct-word ... */