; Fix thinko

diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el
index c21b67ed37ee7e42ff45276177685ede5cdfa56c..51d9f928ef58f6f63ca1f69de134f30a573e9edc 100644 (file)
--- a/lisp/emacs-lisp/lisp-mnt.el
+++ b/lisp/emacs-lisp/lisp-mnt.el
@@ -563,7 +563,7 @@ copyright notice is allowed."
                  (goto-char (point-max))
                  (not
                   (re-search-backward
-                    (rx bol ";;; " (eval name) " ends here")
+                    (rx bol ";;; " (regexp name) " ends here")
                     nil t)))
                "Can't find the footer line")
               ((not (and (lm-copyright-mark) (lm-crack-copyright)))