]> code.delx.au - gnu-emacs/blobdiff - admin/admin.el
* configure.in (LIBX11_MACHINE, HAVE_XFREE386): Remove code
[gnu-emacs] / admin / admin.el
index a490442a44bf1d339fe7d7cada67fcf987232d33..05cd7f944671d040810a466b540915df70a0dfab 100644 (file)
@@ -1,6 +1,6 @@
 ;;; admin.el --- utilities for Emacs administration
 
-;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007
+;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008
 ;;   Free Software Foundation, Inc.
 
 ;; This file is part of GNU Emacs.
@@ -78,6 +78,10 @@ Root must be the root of an Emacs source tree."
   (set-version-in-file root "doc/lispref/elisp.texi" version
                       (rx (and "EMACSVER" (1+ space)
                                (submatch (1+ (in "0-9."))))))
+  (set-version-in-file root "doc/man/emacs.1" version
+                      (rx (and ".TH EMACS" (1+ not-newline)
+                                "GNU Emacs" (1+ space)
+                               (submatch (1+ (in "0-9."))))))
   (set-version-in-file root "lib-src/makefile.w32-in" version
                       (rx (and "VERSION" (0+ space) "=" (0+ space)
                                (submatch (1+ (in "0-9."))))))
@@ -148,6 +152,7 @@ Root must be the root of an Emacs source tree."
                "/* development, alpha, beta, or final (release) */"))))))
 
 ;; Note this makes some assumptions about form of short copyright.
+;; FIXME add the \year in the refcards/*.tex files.
 (defun set-copyright (root copyright)
   "Set Emacs short copyright to COPYRIGHT in relevant files under ROOT.
 Root must be the root of an Emacs source tree."
@@ -162,6 +167,9 @@ Root must be the root of an Emacs source tree."
   (set-version-in-file root "lisp/version.el" copyright
                       (rx (and "emacs-copyright" (0+ space)
                                ?\" (submatch (1+ (not (in ?\")))) ?\")))
+  (set-version-in-file root "lib-src/ebrowse.c" copyright
+                       (rx (and "emacs_copyright" (0+ (not (in ?\")))
+                               ?\" (submatch (1+ (not (in ?\")))) ?\")))
   (set-version-in-file root "lib-src/etags.c" copyright
                        (rx (and "emacs_copyright" (0+ (not (in ?\")))
                                ?\" (submatch (1+ (not (in ?\")))) ?\")))