Mercurial > emacs

changeset 93851:e98f4483662f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(copyright-update-year): Use `looking-at-p'.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 08 Apr 2008 11:40:04 +0000
parents 8e0c4df00f58
children cb8d5a37e8ef
files lisp/emacs-lisp/copyright.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/copyright.el	Tue Apr 08 07:49:03 2008 +0000
+++ b/lisp/emacs-lisp/copyright.el	Tue Apr 08 11:40:04 2008 +0000
@@ -113,12 +113,11 @@
 		  (progn (forward-char 1) t)
 		  (progn (skip-chars-forward " \t") (eolp))
 		  comment-start-skip
-		  (save-match-data
+		  (progn
 		    (forward-line 1)
-		    (and (looking-at comment-start-skip)
+		    (and (looking-at-p comment-start-skip)
 			 (goto-char (match-end 0))))
-		  (save-match-data
-		    (looking-at copyright-years-regexp))))
+		  (looking-at-p copyright-years-regexp)))
       (forward-line 1)
       (re-search-forward comment-start-skip)
       ;; (2) Need the extra \\( \\) so that the years are subexp 3, as