From 8d47e7e5246700bfdd46918c8a1f2a2c265ecdc9 Mon Sep 17 00:00:00 2001 From: Karl Heuer Date: Fri, 12 Jul 1996 00:32:48 +0000 Subject: [PATCH] (dabbrev-case-fold-search, dabbrev-case-replace): Set risky-local-variable property, since these get eval'ed. --- lisp/dabbrev.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/dabbrev.el b/lisp/dabbrev.el index 5de6097500d..ee3f1f55f29 100644 --- a/lisp/dabbrev.el +++ b/lisp/dabbrev.el @@ -121,6 +121,7 @@ The value of this variable is an expression; it is evaluated and the resulting value determines the decision. For example: setting this to `case-fold-search' means evaluate that variable to see whether its value is nil.") +(put 'dabbrev-case-fold-search 'risky-local-variable t) (defvar dabbrev-upcase-means-case-search nil "*The significance of an uppercase character in an abbreviation. @@ -141,6 +142,7 @@ variable to see if its value is t or nil. This variable has an effect only when the value of `dabbrev-case-fold-search' evaluates to t.") +(put 'dabbrev-case-replace 'risky-local-variable t) (defvar dabbrev-abbrev-char-regexp nil "*Regexp to recognize a character in an abbreviation or expansion. -- 2.39.2