# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1207654804 0
# Node ID e98f4483662f995c2f093aabd70a29a9166a5c6c
# Parent  8e0c4df00f585996bda964e65bdc8a7de9e4d777
(copyright-update-year): Use `looking-at-p'.

diff -r 8e0c4df00f58 -r e98f4483662f lisp/emacs-lisp/copyright.el
--- 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