# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 818023380 0
# Node ID 0263e1d2888eef78d19469539eeeadff978732a7
# Parent  d628bf92f672c9b91ab131cea7c35e687b808d4e
(copyright-regexp): Recognize ISO copyright symbol.
(copyright-update): Pattern is now match #2, not #1.

diff -r d628bf92f672 -r 0263e1d2888e lisp/emacs-lisp/copyright.el
--- a/lisp/emacs-lisp/copyright.el	Sun Dec 03 01:51:01 1995 +0000
+++ b/lisp/emacs-lisp/copyright.el	Sun Dec 03 20:43:00 1995 +0000
@@ -34,9 +34,9 @@
 
 
 (defvar copyright-regexp
-  "[Cc]opyright\\s *:?\\s *(C)\\s *\\([1-9][-0-9, ']*[0-9]+\\) "
+  "\\(\251\\|[Cc]opyright\\s *:?\\s *(C)\\)\\s *\\([1-9][-0-9, ']*[0-9]+\\) "
   "*What your copyright notice looks like.
-Must contain \\( \\) construct matching the years.")
+The second \\( \\) construct must match the years.")
 
 
 (defvar copyright-query 'function
@@ -68,7 +68,7 @@
 	  (widen)
 	  (goto-char (point-min))
 	  (if (re-search-forward copyright-regexp copyright-limit t)
-	      (if (string= (buffer-substring (- (match-end 1) 2) (match-end 1))
+	      (if (string= (buffer-substring (- (match-end 2) 2) (match-end 2))
 			   (substring copyright-current-year -2))
 		  ()
 		(backward-char 1)