[Emacs-diffs] Changes to emacs/lisp/emacs-lisp/copyright.el,v

[Stefan Monnier]

CVSROOT:        /sources/emacs
Module name:    emacs
Changes by:     Stefan Monnier <monnier>        07/10/03 23:42:07

Index: emacs-lisp/copyright.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/emacs-lisp/copyright.el,v
retrieving revision 1.67
retrieving revision 1.68
diff -u -b -r1.67 -r1.68
--- emacs-lisp/copyright.el     12 Sep 2007 21:11:03 -0000      1.67
+++ emacs-lisp/copyright.el     3 Oct 2007 23:42:06 -0000       1.68
@@ -186,10 +186,13 @@
  either \\|; a\\^u eldono \\([0-9]+\\)a, ? a\\^u (la\\^u via    \\)\
 version \\([0-9]+\\), or (at"
                 (copyright-limit) t)
-              (not (string= (match-string 3) copyright-current-gpl-version))
+               ;; Don't update if the file is already using a more recent
+               ;; version than the "current" one.
+               (< (string-to-number (match-string 3))
+                  (string-to-number copyright-current-gpl-version))
               (or noquery
-                  (y-or-n-p (concat "Replace GPL version by "
-                                    copyright-current-gpl-version "? ")))
+                  (y-or-n-p (format "Replace GPL version by %s? "
+                                    copyright-current-gpl-version)))
               (progn
                 (if (match-end 2)
                     ;; Esperanto bilingual comment in two-column.el