# HG changeset patch # User Glenn Morris # Date 1193284725 0 # Node ID 64fc611703ff4a8a0a204997857d0bf122c67aab # Parent 2caa33a3b9ba0639cf37e606a60db01e9e42552b (f90-indented-comment-re, f90-directive-comment-re) (f90-break-delimiters): Mark these regexps as safe if they are strings. diff -r 2caa33a3b9ba -r 64fc611703ff lisp/progmodes/f90.el --- a/lisp/progmodes/f90.el Thu Oct 25 03:57:48 2007 +0000 +++ b/lisp/progmodes/f90.el Thu Oct 25 03:58:45 2007 +0000 @@ -229,13 +229,13 @@ "Regexp matching comments to indent as code." :type 'regexp :group 'f90-indent) -;; FIXME are arbitrary regexps safe? Only used in looking-at. +(put 'f90-indented-comment-re 'safe-local-variable 'stringp) (defcustom f90-directive-comment-re "!hpf\\$" "Regexp of comment-like directive like \"!HPF\\\\$\", not to be indented." :type 'regexp :group 'f90-indent) -;; FIXME are arbitrary regexps safe? Only used in looking-at. +(put 'f90-directive-comment-re 'safe-local-variable 'stringp) (defcustom f90-beginning-ampersand t "Non-nil gives automatic insertion of \& at start of continuation line." @@ -262,7 +262,7 @@ specified by the constant `f90-no-break-re'." :type 'regexp :group 'f90) -;; FIXME are arbitrary regexps safe? Used in re-search-backward. +(put 'f90-break-delimiters 'safe-local-variable 'stringp) (defcustom f90-break-before-delimiters t "Non-nil causes `f90-do-auto-fill' to break lines before delimiters."