diff options
| author | Glenn Morris | 2014-11-09 16:17:17 -0800 |
|---|---|---|
| committer | Glenn Morris | 2014-11-09 16:17:17 -0800 |
| commit | a16d6f90eee0668d3658e5a9ad89854a8d95a99a (patch) | |
| tree | 5f163bcdf3b5a5f8d68e3c4a3c81f8307e551932 /admin | |
| parent | 5d4da32d4ec662febf3a2f59b713229867f743cb (diff) | |
| download | emacs-a16d6f90eee0668d3658e5a9ad89854a8d95a99a.tar.gz emacs-a16d6f90eee0668d3658e5a9ad89854a8d95a99a.zip | |
Stop keeping doc/emacs/emacsver.texi in the repository
* configure.ac (doc/emacs/emacsver.texi): Generate it.
* make-dist (doc/emacs/emacsver.texi) [update]: No longer check it.
* doc/emacs/Makefile.in (top_srcdir, version): New, set by configure.
(doc-emacsver): New rule.
(bootstrap-clean, maintainer-clean): Delete emacsver.texi.
(emacsver.texi.in): Rename from emacsver.texi.
* admin/admin.el (set-version): No need to update doc/emacs/emacsver.texi.
(make-manuals-dist-output-variables): Add top_srcdir.
(make-manuals-dist--1): Handle @version@ specially.
* .bzrignore: Add doc/emacs/emacsver.texi.
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/ChangeLog | 6 | ||||
| -rw-r--r-- | admin/admin.el | 17 |
2 files changed, 14 insertions, 9 deletions
diff --git a/admin/ChangeLog b/admin/ChangeLog index e85c21a6cf9..2ec447b133c 100644 --- a/admin/ChangeLog +++ b/admin/ChangeLog | |||
| @@ -1,3 +1,9 @@ | |||
| 1 | 2014-11-10 Glenn Morris <rgm@gnu.org> | ||
| 2 | |||
| 3 | * admin.el (set-version): No need to update doc/emacs/emacsver.texi. | ||
| 4 | (make-manuals-dist-output-variables): Add top_srcdir. | ||
| 5 | (make-manuals-dist--1): Handle @version@ specially. | ||
| 6 | |||
| 1 | 2014-11-09 Eric Ludlam <zappo@gnu.org> | 7 | 2014-11-09 Eric Ludlam <zappo@gnu.org> |
| 2 | 8 | ||
| 3 | * grammars/c.by (template-type): Add :template-specifier and | 9 | * grammars/c.by (template-type): Add :template-specifier and |
diff --git a/admin/admin.el b/admin/admin.el index 48e083d7789..14d851eb202 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -94,9 +94,6 @@ Root must be the root of an Emacs source tree." | |||
| 94 | (rx (and "AC_INIT" (1+ (not (in ?,))) | 94 | (rx (and "AC_INIT" (1+ (not (in ?,))) |
| 95 | ?, (0+ space) | 95 | ?, (0+ space) |
| 96 | (submatch (1+ (in "0-9.")))))) | 96 | (submatch (1+ (in "0-9.")))))) |
| 97 | (set-version-in-file root "doc/emacs/emacsver.texi" version | ||
| 98 | (rx (and "EMACSVER" (1+ space) | ||
| 99 | (submatch (1+ (in "0-9.")))))) | ||
| 100 | (set-version-in-file root "doc/man/emacs.1" version | 97 | (set-version-in-file root "doc/man/emacs.1" version |
| 101 | (rx (and ".TH EMACS" (1+ not-newline) | 98 | (rx (and ".TH EMACS" (1+ not-newline) |
| 102 | "GNU Emacs" (1+ space) | 99 | "GNU Emacs" (1+ space) |
| @@ -611,7 +608,7 @@ style=\"text-align:left\">") | |||
| 611 | 608 | ||
| 612 | 609 | ||
| 613 | (defconst make-manuals-dist-output-variables | 610 | (defconst make-manuals-dist-output-variables |
| 614 | `(("@srcdir@" . ".") | 611 | `(("@\\(top_\\)?srcdir@" . ".") ; top_srcdir is wrong, but not used |
| 615 | ("^\\(\\(?:texinfo\\|buildinfo\\|emacs\\)dir *=\\).*" . "\\1 .") | 612 | ("^\\(\\(?:texinfo\\|buildinfo\\|emacs\\)dir *=\\).*" . "\\1 .") |
| 616 | ("^\\(clean:.*\\)" . "\\1 infoclean") | 613 | ("^\\(clean:.*\\)" . "\\1 infoclean") |
| 617 | ("@MAKEINFO@" . "makeinfo") | 614 | ("@MAKEINFO@" . "makeinfo") |
| @@ -655,11 +652,13 @@ style=\"text-align:left\">") | |||
| 655 | (string-match-p "\\.\\(eps\\|pdf\\)\\'" file))) | 652 | (string-match-p "\\.\\(eps\\|pdf\\)\\'" file))) |
| 656 | (copy-file file stem))) | 653 | (copy-file file stem))) |
| 657 | (with-temp-buffer | 654 | (with-temp-buffer |
| 658 | (insert-file-contents (format "../doc/%s/Makefile.in" type)) | 655 | (let ((outvars make-manuals-dist-output-variables)) |
| 659 | (dolist (cons make-manuals-dist-output-variables) | 656 | (push `("@version@" . ,version) outvars) |
| 660 | (while (re-search-forward (car cons) nil t) | 657 | (insert-file-contents (format "../doc/%s/Makefile.in" type)) |
| 661 | (replace-match (cdr cons) t)) | 658 | (dolist (cons outvars) |
| 662 | (goto-char (point-min))) | 659 | (while (re-search-forward (car cons) nil t) |
| 660 | (replace-match (cdr cons) t)) | ||
| 661 | (goto-char (point-min)))) | ||
| 663 | (let (ats) | 662 | (let (ats) |
| 664 | (while (re-search-forward "@[a-zA-Z_]+@" nil t) | 663 | (while (re-search-forward "@[a-zA-Z_]+@" nil t) |
| 665 | (setq ats t) | 664 | (setq ats t) |