diff options
| -rw-r--r-- | lisp/dabbrev.el | 2 |
1 files changed, 2 insertions, 0 deletions
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 | |||
| 121 | and the resulting value determines the decision. | 121 | and the resulting value determines the decision. |
| 122 | For example: setting this to `case-fold-search' means evaluate that | 122 | For example: setting this to `case-fold-search' means evaluate that |
| 123 | variable to see whether its value is nil.") | 123 | variable to see whether its value is nil.") |
| 124 | (put 'dabbrev-case-fold-search 'risky-local-variable t) | ||
| 124 | 125 | ||
| 125 | (defvar dabbrev-upcase-means-case-search nil | 126 | (defvar dabbrev-upcase-means-case-search nil |
| 126 | "*The significance of an uppercase character in an abbreviation. | 127 | "*The significance of an uppercase character in an abbreviation. |
| @@ -141,6 +142,7 @@ variable to see if its value is t or nil. | |||
| 141 | 142 | ||
| 142 | This variable has an effect only when the value of | 143 | This variable has an effect only when the value of |
| 143 | `dabbrev-case-fold-search' evaluates to t.") | 144 | `dabbrev-case-fold-search' evaluates to t.") |
| 145 | (put 'dabbrev-case-replace 'risky-local-variable t) | ||
| 144 | 146 | ||
| 145 | (defvar dabbrev-abbrev-char-regexp nil | 147 | (defvar dabbrev-abbrev-char-regexp nil |
| 146 | "*Regexp to recognize a character in an abbreviation or expansion. | 148 | "*Regexp to recognize a character in an abbreviation or expansion. |