diff options
| author | Glenn Morris | 2007-10-25 03:58:45 +0000 |
|---|---|---|
| committer | Glenn Morris | 2007-10-25 03:58:45 +0000 |
| commit | f28af2ae4f5ac23021ee0acff8bdf2e4d442addf (patch) | |
| tree | 6e12bd4dd604754659b02b76cff12b492f6118f7 | |
| parent | 83d674bb11f7935fc552edda46ab01a13e4e3a69 (diff) | |
| download | emacs-f28af2ae4f5ac23021ee0acff8bdf2e4d442addf.tar.gz emacs-f28af2ae4f5ac23021ee0acff8bdf2e4d442addf.zip | |
(f90-indented-comment-re, f90-directive-comment-re)
(f90-break-delimiters): Mark these regexps as safe if they are strings.
| -rw-r--r-- | lisp/progmodes/f90.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/progmodes/f90.el b/lisp/progmodes/f90.el index c590b1c55b2..29ffbcfe6b1 100644 --- a/lisp/progmodes/f90.el +++ b/lisp/progmodes/f90.el | |||
| @@ -229,13 +229,13 @@ | |||
| 229 | "Regexp matching comments to indent as code." | 229 | "Regexp matching comments to indent as code." |
| 230 | :type 'regexp | 230 | :type 'regexp |
| 231 | :group 'f90-indent) | 231 | :group 'f90-indent) |
| 232 | ;; FIXME are arbitrary regexps safe? Only used in looking-at. | 232 | (put 'f90-indented-comment-re 'safe-local-variable 'stringp) |
| 233 | 233 | ||
| 234 | (defcustom f90-directive-comment-re "!hpf\\$" | 234 | (defcustom f90-directive-comment-re "!hpf\\$" |
| 235 | "Regexp of comment-like directive like \"!HPF\\\\$\", not to be indented." | 235 | "Regexp of comment-like directive like \"!HPF\\\\$\", not to be indented." |
| 236 | :type 'regexp | 236 | :type 'regexp |
| 237 | :group 'f90-indent) | 237 | :group 'f90-indent) |
| 238 | ;; FIXME are arbitrary regexps safe? Only used in looking-at. | 238 | (put 'f90-directive-comment-re 'safe-local-variable 'stringp) |
| 239 | 239 | ||
| 240 | (defcustom f90-beginning-ampersand t | 240 | (defcustom f90-beginning-ampersand t |
| 241 | "Non-nil gives automatic insertion of \& at start of continuation line." | 241 | "Non-nil gives automatic insertion of \& at start of continuation line." |
| @@ -262,7 +262,7 @@ matching this regexp that should not be split, and these are | |||
| 262 | specified by the constant `f90-no-break-re'." | 262 | specified by the constant `f90-no-break-re'." |
| 263 | :type 'regexp | 263 | :type 'regexp |
| 264 | :group 'f90) | 264 | :group 'f90) |
| 265 | ;; FIXME are arbitrary regexps safe? Used in re-search-backward. | 265 | (put 'f90-break-delimiters 'safe-local-variable 'stringp) |
| 266 | 266 | ||
| 267 | (defcustom f90-break-before-delimiters t | 267 | (defcustom f90-break-before-delimiters t |
| 268 | "Non-nil causes `f90-do-auto-fill' to break lines before delimiters." | 268 | "Non-nil causes `f90-do-auto-fill' to break lines before delimiters." |