diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/emacs-lisp/copyright.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a63589e2798..25516e8d6c1 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2005-04-06 Lute Kamstra <lute@gnu.org> | ||
| 2 | |||
| 3 | * emacs-lisp/copyright.el (copyright-update-year): Replace the | ||
| 4 | right subexpression. Suggested by Jay Bingham <jay.bingham@hp.com>. | ||
| 5 | |||
| 1 | 2005-04-05 Lute Kamstra <lute@gnu.org> | 6 | 2005-04-05 Lute Kamstra <lute@gnu.org> |
| 2 | 7 | ||
| 3 | * generic.el (generic-mode-internal): Fix 2005-03-31 change. | 8 | * generic.el (generic-mode-internal): Fix 2005-03-31 change. |
diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el index 0be9d139fd2..c2d3303c825 100644 --- a/lisp/emacs-lisp/copyright.el +++ b/lisp/emacs-lisp/copyright.el | |||
| @@ -112,7 +112,7 @@ When this is `function', only ask when called non-interactively." | |||
| 112 | (concat "Add " copyright-current-year | 112 | (concat "Add " copyright-current-year |
| 113 | " to copyright? ")))) | 113 | " to copyright? ")))) |
| 114 | (if replace | 114 | (if replace |
| 115 | (replace-match copyright-current-year t t nil 1) | 115 | (replace-match copyright-current-year t t nil 2) |
| 116 | (let ((size (save-excursion (skip-chars-backward "0-9")))) | 116 | (let ((size (save-excursion (skip-chars-backward "0-9")))) |
| 117 | (if (and (eq (% (- (string-to-number copyright-current-year) | 117 | (if (and (eq (% (- (string-to-number copyright-current-year) |
| 118 | (string-to-number (buffer-substring | 118 | (string-to-number (buffer-substring |