diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2008-04-08 11:45:19 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2008-04-08 11:45:19 +0000 |
| commit | 80817d7b5e773d3be5ef4e17947ad841e4ccf91a (patch) | |
| tree | ec3ef1abd8a2649d87367f4d04df3e858cd4c0f4 /lisp/emacs-lisp | |
| parent | 68af6bd60796527d9e6769b1a50dbfe17da37059 (diff) | |
| download | emacs-80817d7b5e773d3be5ef4e17947ad841e4ccf91a.tar.gz emacs-80817d7b5e773d3be5ef4e17947ad841e4ccf91a.tar.bz2 emacs-80817d7b5e773d3be5ef4e17947ad841e4ccf91a.zip | |
(copyright-update-year): Fix braino.
Diffstat (limited to 'lisp/emacs-lisp')
| -rw-r--r-- | lisp/emacs-lisp/copyright.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/emacs-lisp/copyright.el b/lisp/emacs-lisp/copyright.el index 345a76a22d1..d745a245e8e 100644 --- a/lisp/emacs-lisp/copyright.el +++ b/lisp/emacs-lisp/copyright.el @@ -113,9 +113,9 @@ When this is `function', only ask when called non-interactively." (progn (forward-char 1) t) (progn (skip-chars-forward " \t") (eolp)) comment-start-skip - (progn + (save-match-data (forward-line 1) - (and (looking-at-p comment-start-skip) + (and (looking-at comment-start-skip) (goto-char (match-end 0)))) (looking-at-p copyright-years-regexp))) (forward-line 1) |