Commit 5122804a authored by Glenn Morris's avatar Glenn Morris

Remove doc/lispref/two.el

* doc/lispref/two.el: Remove; unused since creation of two-volume.make.

* make-dist: No more doc/lispref/*.el.
parent ca4b98fa
2012-05-08 Glenn Morris <rgm@gnu.org>
* make-dist: No more doc/lispref/*.el.
2012-05-05 Andreas Schwab <schwab@linux-m68k.org>
* configure.in: Fix quoting bugs.
......
2012-05-08 Glenn Morris <rgm@gnu.org>
* two.el: Remove; unused since creation of two-volume.make.
* vol1.texi, vol2.texi: No need to keep menus in these files.
2012-05-05 Glenn Morris <rgm@gnu.org>
......
;; Auxiliary functions for preparing a two volume manual.
;; Copyright (C) 2001-2012 Free Software Foundation, Inc.
;; --rjc 30mar92
;; This file is free software: you can redistribute it and/or modify
;; it under the terms of the GNU General Public License as published by
;; the Free Software Foundation, either version 3 of the License, or
;; (at your option) any later version.
;; This file is distributed in the hope that it will be useful,
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
;; GNU General Public License for more details.
;; You should have received a copy of the GNU General Public License
;; along with this file. If not, see <http://www.gnu.org/licenses/>.
(defun volume-aux-markup (arg)
"Append `vol. NUMBER' to page number.
Apply to aux file that you save.
Then insert marked file into other volume's .aux file."
(interactive "sType volume number, 1 or 2: " )
(goto-char (point-min))
(while (search-forward "-pg" nil t)
(end-of-line 1)
(delete-backward-char 1 nil)
(insert ", vol.'tie" arg "}")))
(defun volume-index-markup (arg)
"Prepend `NUMBER:' to page number. Use Roman Numeral.
Apply only to unsorted index file,
Then insert marked file into other volume's unsorted index file.
Then run texindex on that file and save."
(interactive
"sType volume number, roman number I or II: " )
(goto-char (point-min))
(while (search-forward "\\entry" nil t)
(search-forward "}{" (save-excursion (end-of-line) (point)) nil)
(insert arg ":")))
(defun volume-numbers-toc-markup (arg)
(interactive
"sType volume number, roman number I or II: " )
(goto-char (point-min))
(while (search-forward "chapentry" nil t)
(end-of-line)
(search-backward "{" nil t)
(forward-char 1)
(insert arg ":")))
(defun volume-header-toc-markup ()
"Insert Volume I and Volume II text into .toc file.
NOTE: this auxiliary function is file specific.
This is for the *Elisp Ref Manual*."
(interactive)
(goto-char (point-min))
(insert "\\unnumbchapentry {Volume 1}{}\n\\unnumbchapentry {}{}\n")
(search-forward "\\unnumbchapentry {Index}")
(forward-line 1)
(insert
"\\unnumbchapentry {}{}\n\\unnumbchapentry {}{}\n\\unnumbchapentry {}{}\n\\unnumbchapentry {}{}\n\\unnumbchapentry {Volume 2}{}\n\\unnumbchapentry {}{}\n"))
;;; In batch mode, you cannot call functions with args; hence this kludge:
(defun volume-aux-markup-1 () (volume-aux-markup "1"))
(defun volume-aux-markup-2 () (volume-aux-markup "2"))
(defun volume-index-markup-I () (volume-index-markup "I"))
(defun volume-index-markup-II () (volume-index-markup "II"))
(defun volume-numbers-toc-markup-I () (volume-numbers-toc-markup "I"))
(defun volume-numbers-toc-markup-II () (volume-numbers-toc-markup "II"))
;;; two.el ends here
#!/bin/sh
### make-dist: create an Emacs distribution tar file from current srcdir
## Copyright (C) 1995, 1997-1998, 2000-2012 Free Software Foundation, Inc.
## Copyright (C) 1995, 1997-1998, 2000-2012 Free Software Foundation, Inc.
## This file is part of GNU Emacs.
......@@ -478,8 +478,8 @@ echo "Making links to \`doc/misc'"
echo "Making links to \`doc/lispref'"
(cd doc/lispref
ln *.texi *.in makefile.w32-in README ChangeLog* ../../${tempdir}/doc/lispref
ln *.txt *.el spellfile ../../${tempdir}/doc/lispref
ln two-volume.make ../../${tempdir}/doc/lispref)
ln spellfile ../../${tempdir}/doc/lispref
ln two-volume.make two-volume-cross-refs.txt ../../${tempdir}/doc/lispref)
echo "Making links to \`doc/lispintro'"
(cd doc/lispintro
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment