# HG changeset patch # User Sam Steingold # Date 986496586 0 # Node ID e7d998ab927582ec9877bc7f83f0a1879366f6dc # Parent aac92cb5ba96ec796caf60bc2e2a1d33cb647e29 made font-lock-keywords-case-fold-search buffer-local diff -r aac92cb5ba96 -r e7d998ab9275 lisp/ChangeLog --- a/lisp/ChangeLog Thu Apr 05 18:46:47 2001 +0000 +++ b/lisp/ChangeLog Thu Apr 05 18:49:46 2001 +0000 @@ -1,3 +1,9 @@ +2001-04-05 Sam Steingold + + * font-lock.el (font-lock-keywords-case-fold-search): Make + buffer-local. This fixes a very annoying bug when loading a Lisp + file made font-lock case-insensitive. + 2001-04-05 Gerd Moellmann * faces.el (defface menu): Doc fix. diff -r aac92cb5ba96 -r e7d998ab9275 lisp/font-lock.el --- a/lisp/font-lock.el Thu Apr 05 18:46:47 2001 +0000 +++ b/lisp/font-lock.el Thu Apr 05 18:49:46 2001 +0000 @@ -555,6 +555,7 @@ (defvar font-lock-keywords-case-fold-search nil "*Non-nil means the patterns in `font-lock-keywords' are case-insensitive. This is normally set via `font-lock-defaults'.") +(make-variable-buffer-local 'font-lock-keywords-case-fold-search) (defvar font-lock-syntactically-fontified 0 "Point up to which `font-lock-syntactic-keywords' has been applied.