From: Karl Heuer Date: Sun, 3 Dec 1995 20:43:00 +0000 (+0000) Subject: (copyright-regexp): Recognize ISO copyright symbol. X-Git-Tag: emacs-19.34~2176 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a3296f5a102a4d5649af06e40ef7b5dce48efae0;p=emacs.git (copyright-regexp): Recognize ISO copyright symbol. (copyright-update): Pattern is now match #2, not #1. --- diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el index cea6d6f2072..e6f5ba34f74 100644 --- a/lisp/emacs-lisp/copyright.el +++ b/lisp/emacs-lisp/copyright.el @@ -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 @@ copyright, if any, are updated as well." (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)