Commit eef4375a authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(fortran-match-!-comment): store-match-data => set-match-data.

parent ac092f22
......@@ -1498,7 +1498,7 @@ Return t if `comment-start-skip' found, nil if not."
(if (not found)
nil
;; Cheaper than `looking-at' "!.*".
(store-match-data
(set-match-data
(list (1- (point)) (progn (end-of-line) (min (point) limit))))
t)))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment