procyberian/emacs
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(copyright-regexp): Remove redundancy.

Browse source
This commit is contained in:
Dave Love 2002-07-30 11:23:12 +00:00
parent e18ef64ac6
commit d260b2183f
2 changed files with 13 additions and 11 deletions
Download patch file Download diff file Expand all files Collapse all files

8
lisp/emacs-lisp/copyright.el
View file

@ -43,11 +43,9 @@ A value of nil means to search whole buffer."
;; Would it be cleaner to specify Latin-1 coding for this file,
;; and not use both unibyte and multibyte copyright symbol characters?
;; The character classes include the unibyte (C) sign,
;; the Latin-1 version, and the Latin-9 version.
(defcustom copyright-regexp
"\\([<5B>©Ž©]\\|@copyright{}\\|[Cc]opyright\\s *:?\\s *\\(?:(C)\\)?\
\\|[Cc]opyright\\s *:?\\s *[<EFBFBD>©Ž©]\\)\
"\\(©\\|@copyright{}\\|[Cc]opyright\\s *:?\\s *\\(?:(C)\\)?\
\\|[Cc]opyright\\s *:?\\s *©\\)\
\\s *\\([1-9]\\([-0-9, ';\n\t]\\|\\s<\\|\\s>\\)*[0-9]+\\)"
"*What your copyright notice looks like.
The second \\( \\) construct must match the years."
@ -167,7 +165,7 @@ version \\([0-9]+\\), or (at"
;; For the copyright sign:
;; Local Variables:
;; coding: emacs-mule
;; coding: utf-8
;; End:
;;; copyright.el ends here