patch for copyright.el.

patch for copyright.el.

[Luc Teirlinck]

copyright.el took the following line:

@c Copyright (C) 1985,86,87,93,94,95,97,2000,2001,2002,2003

and transformed it into:

@c Copyright (C) 1985,86,87,93,94,95,97,2000,2001,2002,03,2004

If I understood correctly, we do not want that any more.

The following patch keeps the 2003.  If there are no objections, I
will install it.

===File ~/copyright.el-diff=================================
*** copyright.el	16 Aug 2004 21:15:51 -0500	1.47
--- copyright.el	16 Aug 2004 21:18:06 -0500	
***************
*** 124,149 ****
  			   (eq (char-after (+ (point) size -2)) ?-)))
  		  ;; This is a range so just replace the end part.
  		  (delete-char size)
- 		;; Detect if this is using the following shorthand:
- 		;; (C) 1993, 94, 95, 1998, 2000, 01, 02, 2003
- 		(if (and
- 		     ;; Check that the last year was 4-chars and same century.
- 		     (eq size -4)
- 		     (equal (buffer-substring (- (point) 4) (- (point) 2))
- 			    (substring copyright-current-year 0 2))
- 		     ;; Check that there are 2-char years as well.
- 		     (save-excursion
- 		       (re-search-backward "[^0-9][0-9][0-9][^0-9]"
- 					   (line-beginning-position) t))
- 		     ;; Make sure we don't remove the first century marker.
- 		     (save-excursion
- 		       (forward-char size)
- 		       (re-search-backward
- 			(concat (buffer-substring (point) (+ (point) 2))
- 				"[0-9][0-9]")
- 			(line-beginning-position) t)))
- 		    ;; Remove the century marker of the last entry.
- 		    (delete-region (- (point) 4) (- (point) 2)))
  		;; Insert a comma with the preferred number of spaces.
  		(insert
  		 (save-excursion
--- 124,129 ----
============================================================

Re: patch for copyright.el.

[Richard Stallman]

    The following patch keeps the 2003.  If there are no objections, I
    will install it.

Please do.