Mercurial > hg > xemacs-beta

diff lisp/abbrev.el @ 4009:7147a4dabc02

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-06-12 10:32:15 by adrian]
author adrian
date Tue, 12 Jun 2007 10:32:16 +0000
parents 69c43a181729
children 74d00c7cc134
line wrap: on
line diff
--- a/lisp/abbrev.el	Mon Jun 11 21:51:53 2007 +0000
+++ b/lisp/abbrev.el	Tue Jun 12 10:32:16 2007 +0000
@@ -582,9 +582,9 @@
 			 (<= (setq pnt (point)) (- (point-max) lim))))
 	(if (abbrev-expansion
 	     (setq string
-		   (buffer-substring
-		    (save-excursion (backward-word) (point))
-		    pnt)))
+		   (downcase (buffer-substring
+			      (save-excursion (backward-word) (point))
+			      pnt))))
 	    (if (or noquery (y-or-n-p (format "Expand `%s'? " string)))
 		(expand-abbrev)))))))