# HG changeset patch # User Roland McGrath # Date 745692512 0 # Node ID 4becc54c89dfa445380840c998ec70f3443344f3 # Parent bdc64f0226259fdb6c225e1034c713563a40526b (update-copyright): Handle two-digit years with apostrophes. diff -r bdc64f022625 -r 4becc54c89df lisp/emacs-lisp/copyright.el --- a/lisp/emacs-lisp/copyright.el Mon Aug 16 19:10:25 1993 +0000 +++ b/lisp/emacs-lisp/copyright.el Wed Aug 18 16:48:32 1993 +0000 @@ -56,9 +56,11 @@ (save-restriction (widen) (goto-char (point-min)) - ;; Handle abbreviated year lists like "1800, 01, 02, 03". - (if (re-search-forward (concat (substring current-year 0 2) - "\\([0-9][0-9]\\(,\\s \\)+\\)*" + ;; Handle abbreviated year lists like "1800, 01, 02, 03" + ;; or "1900, '01, '02, '03". + (if (re-search-forward (concat "\\(" (substring current-year 0 2) + "\\)?" + "\\([0-9][0-9]\\(,\\s \\)+\\)*'?" (substring current-year 2)) nil t) (or ask-upd