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

diff --git a/lisp/progmodes/fortran.el b/lisp/progmodes/fortran.el
index be43ac0..4b38c30 100644 (file)
--- a/lisp/progmodes/fortran.el
+++ b/lisp/progmodes/fortran.el
@@ -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)))