changeset 15652:d6260a2af456

(dabbrev-case-fold-search, dabbrev-case-replace): Set risky-local-variable property, since these get eval'ed.
author Karl Heuer <kwzh@gnu.org>
date Fri, 12 Jul 1996 00:32:48 +0000
parents b055a4ec9351
children 1653d3208c05
files lisp/dabbrev.el
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/dabbrev.el	Fri Jul 12 00:26:02 1996 +0000
+++ b/lisp/dabbrev.el	Fri Jul 12 00:32:48 1996 +0000
@@ -121,6 +121,7 @@
 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 @@
 
 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.