diff options
| author | Lute Kamstra <lute@gnu.org> | 2005-04-05 23:19:34 +0000 |
|---|---|---|
| committer | Lute Kamstra <lute@gnu.org> | 2005-04-05 23:19:34 +0000 |
| commit | e0e5f0766cda897cb594ef7f1b1fedd7cdcea519 (patch) | |
| tree | 18bb011dd0df8cad726e1728e9ba4cc3c4cc2593 /lisp/emacs-lisp | |
| parent | 7bade82d969028c34ec167815fd0d6830d2398d4 (diff) | |
| download | emacs-e0e5f0766cda897cb594ef7f1b1fedd7cdcea519.tar.gz emacs-e0e5f0766cda897cb594ef7f1b1fedd7cdcea519.tar.bz2 emacs-e0e5f0766cda897cb594ef7f1b1fedd7cdcea519.zip | |
(copyright-update-year): Replace the right subexpression. Suggested
by Jay Bingham <jay.bingham@hp.com>.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/copyright.el | 2 |
1 files changed, 1 insertions, 1 deletions
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." (concat "Add " copyright-current-year " to copyright? ")))) (if replace - (replace-match copyright-current-year t t nil 1) + (replace-match copyright-current-year t t nil 2) (let ((size (save-excursion (skip-chars-backward "0-9")))) (if (and (eq (% (- (string-to-number copyright-current-year) (string-to-number (buffer-substring |