From: Glenn Morris Date: Thu, 29 Apr 2021 18:42:03 +0000 (-0700) Subject: Automatically generate texinfo.el internal autoloads X-Git-Tag: emacs-28.0.90~2670 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=68bf917896daa10601c3fdff172205e9aa06d155;p=emacs.git Automatically generate texinfo.el internal autoloads * lisp/textmodes/texinfo.el: Replace manual autoloads. * lisp/textmodes/makeinfo.el (makeinfo-region, makeinfo-buffer) (makeinfo-recenter-compilation-buffer): * lisp/textmodes/texnfo-upd.el (texinfo-make-menu) (texinfo-all-menus-update, texinfo-start-menu-description) (texinfo-indent-menu-description, texinfo-master-menu) (texinfo-update-node, texinfo-every-node-update) (texinfo-sequential-node-update, texinfo-insert-node-lines) (texinfo-multiple-files-update): Add autoload cookies, and set generated-autoload-file. --- diff --git a/lisp/textmodes/makeinfo.el b/lisp/textmodes/makeinfo.el index 653540ad415..13367a09bcf 100644 --- a/lisp/textmodes/makeinfo.el +++ b/lisp/textmodes/makeinfo.el @@ -85,6 +85,7 @@ the proper way to specify those is with the Texinfo commands ;;; The `makeinfo' function definitions +;;;###autoload (defun makeinfo-region (region-beginning region-end) "Make Info file from region of current Texinfo file, and switch to it. @@ -222,6 +223,7 @@ nonsensical results." (match-string 1) "Top"))) +;;;###autoload (defun makeinfo-buffer () "Make Info file from current buffer. @@ -266,6 +268,7 @@ Use the \\[next-error] command to move to the next error (Info-revert-find-node makeinfo-output-file-name makeinfo-output-node-name)))) +;;;###autoload (defun makeinfo-recenter-compilation-buffer (linenum) "Redisplay `*compilation*' buffer so most recent output can be seen. The last line of the buffer is displayed on @@ -286,4 +289,8 @@ line LINE of the window, or centered if LINE is nil." (provide 'makeinfo) +;; Local Variables: +;; generated-autoload-file: "texinfo-loaddefs.el" +;; End: + ;;; makeinfo.el ends here diff --git a/lisp/textmodes/texinfo.el b/lisp/textmodes/texinfo.el index 750a33db0aa..11d60e1eb03 100644 --- a/lisp/textmodes/texinfo.el +++ b/lisp/textmodes/texinfo.el @@ -69,202 +69,12 @@ ;;; Autoloads: -(autoload 'makeinfo-region - "makeinfo" - "Make Info file from region of current Texinfo file, and switch to it. - -This command does not offer the `next-error' feature since it would -apply to a temporary file, not the original; use the `makeinfo-buffer' -command to gain use of `next-error'." - t nil) - -(autoload 'makeinfo-buffer - "makeinfo" - "Make Info file from current buffer. - -Use the \\[next-error] command to move to the next error -\(if there are errors)." - t nil) - (autoload 'kill-compilation "compile" "Kill the process made by the \\[compile] command." t nil) -(autoload 'makeinfo-recenter-compilation-buffer - "makeinfo" - "Redisplay `*compilation*' buffer so most recent output can be seen. -The last line of the buffer is displayed on -line LINE of the window, or centered if LINE is nil." - t nil) - -(autoload 'texinfo-update-node - "texnfo-upd" - "Without any prefix argument, update the node in which point is located. -Non-nil argument (prefix, if interactive) means update the nodes in the -marked region. - -The functions for creating or updating nodes and menus, and their -keybindings, are: - - `texinfo-update-node' (&optional region-p) \\[texinfo-update-node] - `texinfo-every-node-update' () \\[texinfo-every-node-update] - `texinfo-sequential-node-update' (&optional region-p) - - `texinfo-make-menu' (&optional region-p) \\[texinfo-make-menu] - `texinfo-all-menus-update' () \\[texinfo-all-menus-update] - `texinfo-master-menu' () - - `texinfo-indent-menu-description' (column &optional region-p) - -The `texinfo-column-for-description' variable specifies the column to -which menu descriptions are indented. Its default value is 32." - t nil) - -(autoload 'texinfo-every-node-update - "texnfo-upd" - "Update every node in a Texinfo file." - t nil) - -(autoload 'texinfo-sequential-node-update - "texnfo-upd" - "Update one node (or many) in a Texinfo file with sequential pointers. - -This function causes the `Next' or `Previous' pointer to point to the -immediately preceding or following node, even if it is at a higher or -lower hierarchical level in the document. Continually pressing `n' or -`p' takes you straight through the file. - -Without any prefix argument, update the node in which point is located. -Non-nil argument (prefix, if interactive) means update the nodes in the -marked region. - -This command makes it awkward to navigate among sections and -subsections; it should be used only for those documents that are meant -to be read like a novel rather than a reference, and for which the -Info `g*' command is inadequate." - t nil) - -(autoload 'texinfo-make-menu - "texnfo-upd" - "Without any prefix argument, make or update a menu. -Make the menu for the section enclosing the node found following point. - -Non-nil argument (prefix, if interactive) means make or update menus -for nodes within or part of the marked region. - -Whenever a menu exists, and is being updated, the descriptions that -are associated with node names in the pre-existing menu are -incorporated into the new menu. Otherwise, the nodes' section titles -are inserted as descriptions." - t nil) - -(autoload 'texinfo-all-menus-update - "texnfo-upd" - "Update every regular menu in a Texinfo file. -Remove pre-existing master menu, if there is one. - -If called with a non-nil argument, this function first updates all the -nodes in the buffer before updating the menus." - t nil) - -(autoload 'texinfo-master-menu - "texnfo-upd" - "Make a master menu for a whole Texinfo file. -Non-nil argument (prefix, if interactive) means first update all -existing nodes and menus. Remove pre-existing master menu, if there is one. - -This function creates a master menu that follows the top node. The -master menu includes every entry from all the other menus. It -replaces any existing ordinary menu that follows the top node. - -If called with a non-nil argument, this function first updates all the -menus in the buffer (incorporating descriptions from pre-existing -menus) before it constructs the master menu. - -The function removes the detailed part of an already existing master -menu. This action depends on the pre-existing master menu using the -standard `texinfo-master-menu-header'. - -The master menu has the following format, which is adapted from the -recommendation in the Texinfo Manual: - - * The first part contains the major nodes in the Texinfo file: the - nodes for the chapters, chapter-like sections, and the major - appendices. This includes the indices, so long as they are in - chapter-like sections, such as unnumbered sections. - - * The second and subsequent parts contain a listing of the other, - lower level menus, in order. This way, an inquirer can go - directly to a particular node if he or she is searching for - specific information. - -Each of the menus in the detailed node listing is introduced by the -title of the section containing the menu." - t nil) - -(autoload 'texinfo-indent-menu-description - "texnfo-upd" - "Indent every description in menu following point to COLUMN. -Non-nil argument (prefix, if interactive) means indent every -description in every menu in the region. Does not indent second and -subsequent lines of a multi-line description." - t nil) - -(autoload 'texinfo-insert-node-lines - "texnfo-upd" - "Insert missing `@node' lines in region of Texinfo file. -Non-nil argument (prefix, if interactive) means also to insert the -section titles as node names; and also to insert the section titles as -node names in pre-existing @node lines that lack names." - t nil) - -(autoload 'texinfo-start-menu-description - "texnfo-upd" - "In this menu entry, insert the node's section title as a description. -Position point at beginning of description ready for editing. -Do not insert a title if the line contains an existing description. - -You will need to edit the inserted text since a useful description -complements the node name rather than repeats it as a title does." - t nil) - -(autoload 'texinfo-multiple-files-update - "texnfo-upd" - "Update first node pointers in each file included in OUTER-FILE; -create or update main menu in the outer file that refers to such nodes. -This does not create or update menus or pointers within the included files. - -With optional MAKE-MASTER-MENU argument (prefix arg, if interactive), -insert a master menu in OUTER-FILE. This does not create or update -menus or pointers within the included files. - -With optional UPDATE-EVERYTHING argument (numeric prefix arg, if -interactive), update all the menus and all the `Next', `Previous', and -`Up' pointers of all the files included in OUTER-FILE before inserting -a master menu in OUTER-FILE. - -The command also updates the `Top' level node pointers of OUTER-FILE. - -Notes: - - * this command does NOT save any files--you must save the - outer file and any modified, included files. - - * except for the `Top' node, this command does NOT handle any - pre-existing nodes in the outer file; hence, indices must be - enclosed in an included file. - -Requirements: - - * each of the included files must contain exactly one highest - hierarchical level node, - * this highest node must be the first node in the included file, - * each highest hierarchical level node must be of the same type. - -Thus, normally, each included file contains one, and only one, -chapter." - t nil) +(require 'texinfo-loaddefs) ;;; Code: diff --git a/lisp/textmodes/texnfo-upd.el b/lisp/textmodes/texnfo-upd.el index 03004548302..f56f197c502 100644 --- a/lisp/textmodes/texnfo-upd.el +++ b/lisp/textmodes/texnfo-upd.el @@ -275,6 +275,7 @@ The keys are strings specifying the general hierarchical level in the document; the values are regular expressions.") +;;;###autoload (defun texinfo-make-menu (&optional beginning end) "Without any prefix argument, make or update a menu. Make the menu for the section enclosing the node found following point. @@ -351,6 +352,7 @@ at the level specified by LEVEL. Point is left at the end of menu." (texinfo-delete-old-menu beginning first)) (texinfo-insert-menu new-menu-list node-name))) +;;;###autoload (defun texinfo-all-menus-update (&optional update-all-nodes-p) "Update every regular menu in a Texinfo file. Update pre-existing master menu, if there is one. @@ -733,6 +735,7 @@ is the menu entry name, and the cdr of P is the node name." ;;; Starting menu descriptions by inserting titles +;;;###autoload (defun texinfo-start-menu-description () "In this menu entry, insert the node's section title as a description. Position point at beginning of description ready for editing. @@ -817,6 +820,7 @@ complements the node name rather than repeats it as a title does." ;; Since the make-menu functions indent descriptions, these functions ;; are useful primarily for indenting a single menu specially. +;;;###autoload (defun texinfo-indent-menu-description (column &optional region-p) "Indent every description in menu following point to COLUMN. Non-nil argument (prefix, if interactive) means indent every @@ -872,6 +876,7 @@ second and subsequent lines of a multi-line description." ;;; Making the master menu +;;;###autoload (defun texinfo-master-menu (update-all-nodes-menus-p) "Make a master menu for a whole Texinfo file. Remove pre-existing master menu, if there is one. @@ -1266,6 +1271,7 @@ end of that region; it limits the search." ;;; Updating a node +;;;###autoload (defun texinfo-update-node (&optional beginning end) "Without any prefix argument, update the node in which point is located. Interactively, a prefix argument means to operate on the region. @@ -1313,6 +1319,7 @@ which menu descriptions are indented. Its default value is 32." (goto-char (point-max)) (message "Done...nodes updated in region. You may save the buffer.")))))) +;;;###autoload (defun texinfo-every-node-update () "Update every node in a Texinfo file. @@ -1553,6 +1560,7 @@ towards which the pointer is directed, one of `next', `previous', or `up'." ;; (The subsection to which `Next' points will most likely be the first ;; item on the section's menu.) +;;;###autoload (defun texinfo-sequential-node-update (&optional region-p) "Update one node (or many) in a Texinfo file with sequential pointers. @@ -1676,6 +1684,7 @@ or `Up' pointer." ;; before the `@chapter', `@section', and such like lines of a region ;; in a Texinfo file. +;;;###autoload (defun texinfo-insert-node-lines (beginning end &optional title-p) "Insert missing `@node' lines in region of Texinfo file. Non-nil argument (prefix, if interactive) means also to insert the @@ -1989,6 +1998,7 @@ be the files included within it. A main menu must already exist." ;;; The multiple-file update function +;;;###autoload (defun texinfo-multiple-files-update (outer-file &optional make-master-menu update-everything) "Update first node pointers in each file included in OUTER-FILE; @@ -2114,4 +2124,8 @@ chapter." (provide 'texnfo-upd) +;; Local Variables: +;; generated-autoload-file: "texinfo-loaddefs.el" +;; End: + ;;; texnfo-upd.el ends here