aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--lisp/emacs-lisp/lisp-mnt.el6
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/emacs-lisp/lisp-mnt.el b/lisp/emacs-lisp/lisp-mnt.el
index 245772dfc54..e67835eb82d 100644
--- a/lisp/emacs-lisp/lisp-mnt.el
+++ b/lisp/emacs-lisp/lisp-mnt.el
@@ -1,6 +1,6 @@
1;;; lisp-mnt.el --- utility functions for Emacs Lisp maintainers 1;;; lisp-mnt.el --- utility functions for Emacs Lisp maintainers
2 2
3;; Copyright (C) 1992, 1994, 1997, 2000, 2001, 2003 Free Software Foundation, Inc. 3;; Copyright (C) 1992, 1994, 1997, 2000, 2001, 2003, 2004 Free Software Foundation, Inc.
4 4
5;; Author: Eric S. Raymond <esr@snark.thyrsus.com> 5;; Author: Eric S. Raymond <esr@snark.thyrsus.com>
6;; Maintainer: FSF 6;; Maintainer: FSF
@@ -522,7 +522,7 @@ copyright notice is allowed."
522 (setq ret 522 (setq ret
523 (cond 523 (cond
524 ((null name) 524 ((null name)
525 (format "Package %s does not exist")) 525 "Can't find package name")
526 ((not (lm-authors)) 526 ((not (lm-authors))
527 "`Author:' tag missing") 527 "`Author:' tag missing")
528 ((not (lm-maintainer)) 528 ((not (lm-maintainer))
@@ -546,7 +546,7 @@ copyright notice is allowed."
546 (concat "^;;;[ \t]+" name "[ \t]+ends here[ \t]*$" 546 (concat "^;;;[ \t]+" name "[ \t]+ends here[ \t]*$"
547 "\\|^;;;[ \t]+ End of file[ \t]+" name) 547 "\\|^;;;[ \t]+ End of file[ \t]+" name)
548 nil t))) 548 nil t)))
549 (format "Can't find the footer line")) 549 "Can't find the footer line")
550 ((not (and (lm-copyright-mark) (lm-crack-copyright))) 550 ((not (and (lm-copyright-mark) (lm-crack-copyright)))
551 "Can't find a valid copyright notice") 551 "Can't find a valid copyright notice")
552 ((not (or non-fsf-ok 552 ((not (or non-fsf-ok