Mercurial > emacs

diff lisp/emacs-lisp/copyright.el @ 103919:ab3de87ae5a3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(copyright-update): Save match-data across y-or-n-p, for safety.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Thu, 16 Jul 2009 02:01:31 +0000
parents e22cfe7e0065
children 1d1d5d9bd884
line wrap: on
line diff
--- a/lisp/emacs-lisp/copyright.el	Thu Jul 16 01:52:32 2009 +0000
+++ b/lisp/emacs-lisp/copyright.el	Thu Jul 16 02:01:31 2009 +0000
@@ -223,8 +223,9 @@
                (< (string-to-number (match-string 3))
                   (string-to-number copyright-current-gpl-version))
 	       (or noquery
-		   (y-or-n-p (format "Replace GPL version by %s? "
-				     copyright-current-gpl-version)))
+                   (save-match-data
+                     (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