Adjust lm-verify to accept current notices

Problem reported by Mike Kupfer in:
http://lists.gnu.org/archive/html/emacs-devel/2017-06/msg00512.html
* lisp/emacs-lisp/lisp-mnt.el (lm-crack-copyright):
Do not require later lines in a copyright notice to have more
indentation than earlier lines.

diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el
index fc3caf3359a67a79ca8ad0a6f5b819b38fc5125c..a1c5b6977f894da063fa73cf7c954a756dff7750 100644 (file)
--- a/lisp/emacs-lisp/lisp-mnt.el
+++ b/lisp/emacs-lisp/lisp-mnt.el
@@ -326,12 +326,13 @@ Return argument is of the form (\"HOLDER\" \"YEAR1\" ... \"YEARN\")"
          (start (point))
          (end (line-end-position)))
       ;; Cope with multi-line copyright `lines'.  Assume the second
-      ;; line is indented (with the same commenting style).
+      ;; line is indented at least as much as the original, with the
+      ;; same commenting style.
       (save-excursion
        (beginning-of-line 2)
-       (let ((str (concat (match-string-no-properties 1) "[ \t]+")))
+       (let ((str (match-string-no-properties 1)))
          (beginning-of-line)
-         (while (looking-at str)
+         (while (and (looking-at str) (not (looking-at lm-copyright-prefix)))
            (setq end (line-end-position))
            (beginning-of-line 2))))
       ;; Make a single line and parse that.