aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorKarl Berry2004-01-04 23:00:06 +0000
committerKarl Berry2004-01-04 23:00:06 +0000
commit17b337762fe7df77aa8a6dfcea0109a267bea83d (patch)
treeb30bd0a0351c1bb4ec4e5bd33f99788cf88af6be /lisp
parente822882420396cb0fd14cf3e33b8035306dac726 (diff)
downloademacs-17b337762fe7df77aa8a6dfcea0109a267bea83d.tar.gz
emacs-17b337762fe7df77aa8a6dfcea0109a267bea83d.zip
allow % and # as well as ; in copyright notice
Diffstat (limited to 'lisp')
-rw-r--r--lisp/ChangeLog6
-rw-r--r--lisp/emacs-lisp/copyright.el4
2 files changed, 8 insertions, 2 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 08d3d17ce0b..14963f0ef8c 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,9 @@
12004-01-04 Karl Berry <karl@gnu.org>
2
3 * emacs-lisp/copyright.el (copyright-regexp): allow the common
4 comment characters % and # in the copyright year notice,
5 as well as ;.
6
12004-01-04 Per Abrahamsen <abraham@dina.kvl.dk> 72004-01-04 Per Abrahamsen <abraham@dina.kvl.dk>
2 8
3 * wid-edit.el (default): Define dummy :value-delete. 9 * wid-edit.el (default): Define dummy :value-delete.
diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el
index fc0a5b74726..4532f7e5b77 100644
--- a/lisp/emacs-lisp/copyright.el
+++ b/lisp/emacs-lisp/copyright.el
@@ -1,6 +1,6 @@
1;;; copyright.el --- update the copyright notice in current buffer 1;;; copyright.el --- update the copyright notice in current buffer
2 2
3;; Copyright (C) 1991, 92, 93, 94, 95, 1998, 2001, 2003 3;; Copyright (C) 1991, 92, 93, 94, 95, 1998, 2001, 2003, 2004
4;; Free Software Foundation, Inc. 4;; Free Software Foundation, Inc.
5 5
6;; Author: Daniel Pfeiffer <occitan@esperanto.org> 6;; Author: Daniel Pfeiffer <occitan@esperanto.org>
@@ -47,7 +47,7 @@ A value of nil means to search whole buffer."
47(defcustom copyright-regexp 47(defcustom copyright-regexp
48 "\\([]\\|@copyright{}\\|[Cc]opyright\\s *:?\\s *\\(?:(C)\\)?\ 48 "\\([]\\|@copyright{}\\|[Cc]opyright\\s *:?\\s *\\(?:(C)\\)?\
49\\|[Cc]opyright\\s *:?\\s *[]\\)\ 49\\|[Cc]opyright\\s *:?\\s *[]\\)\
50\\s *\\([1-9]\\([-0-9, ';\n\t]\\|\\s<\\|\\s>\\)*[0-9]+\\)" 50\\s *\\([1-9]\\([-0-9, ';%#\n\t]\\|\\s<\\|\\s>\\)*[0-9]+\\)"
51 "*What your copyright notice looks like. 51 "*What your copyright notice looks like.
52The second \\( \\) construct must match the years." 52The second \\( \\) construct must match the years."
53 :group 'copyright 53 :group 'copyright