;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:11:52 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/textmodes/texnfo-upd.el
;;; in Emacs version 24.3.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


(require 'texinfo)
#@115 String inserted before lower level entries in Texinfo master menu.
It comes after the chapter-level menu entries.
(defvar texinfo-master-menu-header " --- The Detailed Node Listing ---\n" (#$ . 583))
#@74 Regexp matching chapter, section, other headings (but not the top node).
(defvar texinfo-section-types-regexp "^@\\(chapter \\|sect\\|subs\\|subh\\|unnum\\|major\\|chapheading \\|heading \\|appendix\\)" (#$ . 789))
#@70 Regular expression matching just the Texinfo section level headings.
(defvar texinfo-section-level-regexp (byte-code "\301\302\303\"!\207" [texinfo-section-list regexp-opt texinfo-filter 3] 4) (#$ . 1010))
#@73 Regular expression matching just the Texinfo subsection level headings.
(defvar texinfo-subsection-level-regexp (byte-code "\301\302\303\"!\207" [texinfo-section-list regexp-opt texinfo-filter 4] 4) (#$ . 1223))
#@76 Regular expression matching just the Texinfo subsubsection level headings.
(defvar texinfo-subsubsection-level-regexp (byte-code "\301\302\303\"!\207" [texinfo-section-list regexp-opt texinfo-filter 5] 4) (#$ . 1442))
#@182 Regexps for searching for same level sections in a Texinfo file.
The keys are strings specifying the general hierarchical level in the
document; the values are regular expressions.
(defvar texinfo-update-menu-same-level-regexps '((1 . "top[ 	]+") (2 concat "\\(^@\\)\\(" texinfo-chapter-level-regexp "\\)\\>[ 	]*") (3 concat "\\(^@\\)\\(" texinfo-section-level-regexp "\\)\\>[ 	]*") (4 concat "\\(^@\\)\\(" texinfo-subsection-level-regexp "\\)\\>[ 	]+") (5 concat "\\(^@\\)\\(" texinfo-subsubsection-level-regexp "\\)\\>[ 	]+")) (#$ . 1668))
#@184 Regexps for searching for higher level sections in a Texinfo file.
The keys are strings specifying the general hierarchical level in the
document; the values are regular expressions.
(defvar texinfo-update-menu-higher-regexps '((1 . "^@node [ 	]*DIR") (2 . "^@node [ 	]*top[ 	]*\\(,\\|$\\)") (3 concat "\\(^@\\(" texinfo-chapter-level-regexp "\\)\\>[ 	]*\\)") (4 concat "\\(^@\\(" texinfo-section-level-regexp "\\|" texinfo-chapter-level-regexp "\\)\\>[ 	]*\\)") (5 concat "\\(^@\\(" texinfo-subsection-level-regexp "\\|" texinfo-section-level-regexp "\\|" texinfo-chapter-level-regexp "\\)\\>[ 	]*\\)")) (#$ . 2217))
#@183 Regexps for searching for lower level sections in a Texinfo file.
The keys are strings specifying the general hierarchical level in the
document; the values are regular expressions.
(defvar texinfo-update-menu-lower-regexps '((1 concat "\\(^@\\(" texinfo-chapter-level-regexp "\\|" texinfo-section-level-regexp "\\|" texinfo-subsection-level-regexp "\\|" texinfo-subsubsection-level-regexp "\\)\\>[ 	]*\\)") (2 concat "\\(^@\\(" texinfo-section-level-regexp "\\|" texinfo-subsection-level-regexp "\\|" texinfo-subsubsection-level-regexp "\\)\\>[ 	]*\\)") (3 concat "\\(^@\\(" texinfo-subsection-level-regexp "\\|" texinfo-subsubsection-level-regexp "\\)\\>[ 	]+\\)") (4 concat "\\(^@\\(" texinfo-subsubsection-level-regexp "\\)\\>[ 	]+\\)") (5 . "a\\(^\\)")) (#$ . 2842))
#@607 Without any prefix argument, make or update a menu.
Make the menu for the section enclosing the node found following point.

A prefix argument 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.

Leaves trailing whitespace in a menu that lacks descriptions, so
descriptions will format well.  In general, a menu should contain
descriptions, because node names and section titles are often too
short to explain a node well.
(defalias 'texinfo-make-menu #[(&optional beginning end) "\204\304 \305	!\210\306\307!)\207\306\310\311 \"\210\212\n^b\210\304 \312 \n]\313\223\210\214~\210\314	\315!\"\203?\304 \305	!\210\202,`\315!W\203i\316	\315!\"\203i\304 \317y\210\314	\315!\"\203?\304 \305	!\210\202V,\306\320\311 \"\207" [beginning level end region-end-marker texinfo-hierarchic-level texinfo-make-one-menu message "Menu updated" "Making or updating menus in %s... " buffer-name make-marker nil texinfo-find-lower-level-node marker-position texinfo-find-higher-level-node 1 "Making or updating menus in %s...done"] 4 (#$ . 3621) (byte-code "\205`\301 D\207" [prefix-arg mark] 2)])
#@191 Make a menu of all the appropriate nodes in this section.
`Appropriate nodes' are those associated with sections that are
at the level specified by LEVEL.  Point is left at the end of menu.
(defalias 'texinfo-make-one-menu #[(level) "\306\212\307	!b\210\310\210`)\311	!\312\n\"\nb\210\313 \210\314 \315\n	#\316\n\f\"\203=\317!\210\320!\210\321\n\f\"\210\322
\".\207" [case-fold-search level beginning end first node-name t texinfo-update-menu-region-beginning nil texinfo-update-menu-region-end texinfo-menu-first-node beginning-of-line texinfo-copy-node-name texinfo-make-menu-list texinfo-old-menu-p texinfo-incorporate-descriptions texinfo-incorporate-menu-entry-names texinfo-delete-old-menu texinfo-insert-menu new-menu-list] 4 (#$ . 4914)])
#@740 Update every regular menu in a Texinfo file.
Update pre-existing master menu, if there is one.

Only single-file manuals are supported by this function.  For
multi-file manuals, use `texinfo-multiple-files-update'.

If called with a non-nil argument, this function first updates all the
nodes in the buffer before updating the menus.  Do NOT invoke this
command with an argument if your Texinfo file uses @node lines without
the `Next', `Previous', and `Up' pointers!

Indents the first line of descriptions, and leaves trailing whitespace
in a menu that lacks descriptions, so descriptions will format well.
In general, a menu should contain descriptions, because node names and
section titles are often too short to explain a node well.
(defalias 'texinfo-all-menus-update #[(&optional update-all-nodes-p) "\305\306\212\307d\305\"\210eb\210\310\311\312 \"\210\212\313\n\306\305#\203=\314\315\316\317!\305#\210\305\320\224b\210\212\321 b\210\322 \210\323u\210`)`|\210))\f\203M\310\324\312 \"\210\325ed\"\210\310\326\312 \"\210\327de\"\210\203f\310\330\312 \"\210\331\306!\210)\310\332!*\207" [master-menu-p case-fold-search texinfo-master-menu-header end-of-detailed-menu-descriptions update-all-nodes-p t nil push-mark message "Checking for a master menu in %s ... " buffer-name search-forward search-backward "\n@detailmenu" line-beginning-position -2 0 texinfo-menu-end beginning-of-line -1 "Updating all nodes in %s ... " texinfo-update-node "Updating all menus in %s ... " texinfo-make-menu "Updating the master menu in %s... " texinfo-master-menu "Done...updated all the menus.  You may save the buffer."] 4 (#$ . 5686) "P"])
#@304 Search forward from point for node at any level lower than LEVEL.
Search is limited to the end of the marked region, REGION-END,
and to the end of the menu region for the level.

Return t if the node is found, else nil.  Leave point at the beginning
of the node if one is found; else do not move point.
(defalias 'texinfo-find-lower-level-node #[(level region-end) "\304`	W\205$\305\306\307\310\311\310\312\313\314\315\n\"A!\260\316\n!\304#\205$\317\224b)\207" [case-fold-search region-end level texinfo-update-menu-lower-regexps t re-search-forward "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" eval assoc texinfo-update-menu-region-end 1] 12 (#$ . 7335)])
#@391 Search forward from point for node at any higher level than argument LEVEL.
Search is limited to the end of the marked region, REGION-END.

Return t if the node is found, else nil.  Leave point at the beginning
of the node if one is found; else do not move point.

A `@node' line starting at point does count as a match;
if the match is found there, the value is t and point does not move.
(defalias 'texinfo-find-higher-level-node #[(level region-end) "\304	\305W\203\306\307\n\304#\2052\310 \210\304\2022\306\311\312\313\314\313\315\316\317\320	\"A!\260\n\304#\2052\310 \210\304)\207" [case-fold-search level region-end texinfo-update-menu-higher-regexps t 3 re-search-forward "^@node [ 	]*top[ 	]*\\(,\\|$\\)" beginning-of-line "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" eval assoc] 12 (#$ . 8064)])
#@499 Make a list of node names and their descriptions.
Point is left at the end of the menu region, but the menu is not inserted.

First argument is position from which to start making menu list;
second argument is end of region in which to try to locate entries;
third argument is the level of the nodes that are the entries.

Node names and descriptions are dotted pairs of strings.  Each pair is
an element of the list.  If the description does not exist, the
element consists only of the node name.
(defalias 'texinfo-make-menu-list #[(beginning end level) "b\210\304\305\n\"\203\306 \307\310y\210B	B\202	\237)\207" [beginning new-menu-list level end nil texinfo-menu-locate-entry-p texinfo-copy-node-name "" 1] 3 (#$ . 8944)])
#@477 Find a node that will be part of menu for this section.
First argument is a string such as "section" specifying the general
hierarchical level of the menu; second argument is a position
specifying the end of the search.

The function returns t if the node is found, else nil.  It searches
forward from point, and leaves point at the beginning of the node.

The function finds entries of the same type.  Thus `subsections' and
`unnumberedsubsecs' will appear in the same menu.
(defalias 'texinfo-menu-locate-entry-p #[(level search-end) "\304\305\306\307\310\311\310\312\313\314\315	\n\"A!\260\304#\205\316\224b)\207" [case-fold-search level texinfo-update-menu-same-level-regexps search-end t re-search-forward "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" eval assoc 1] 12 (#$ . 9686)])
#@297 Return the node name as a string.

Start with point at the beginning of the node line; copy the text
after the node command up to the first comma on the line, if any, and
return the text as a string.  Leaves point at the beginning of the
line.  If there is no node name, returns an empty string.
(defalias 'texinfo-copy-node-name #[nil "\212\300v\210\301\302w\210`\303\304\305 \306#\203`S\202\302\210`{)\207" [1 " 	" nil search-forward "," line-end-position t] 5 (#$ . 10545)])
#@323 Return the title of the section as a string.
The title is used as a description line in the menu when one does not
already exist.

Move point to the beginning of the appropriate section line by going
to the start of the text matched by last regexp searched for, which
must have been done by `texinfo-menu-locate-entry-p'.
(defalias 'texinfo-copy-section-title #[nil "\300\224b\210\301v\210\302\303w\210`\303\210`{\207" [7 1 " 	" nil] 2 (#$ . 11035)])
#@488 Move point to the beginning of the menu for this section, if any.
Otherwise move point to the end of the first node of this section.
Return t if a menu is found, nil otherwise.

First argument is the position of the beginning of the section in which
the menu will be located; second argument is the position of the first
node within the section.

If no menu is found, the function inserts two newlines just before the
end of the section, and leaves point there where a menu ought to be.
(defalias 'texinfo-old-menu-p #[(beginning first) "b\210\302\303	\304#\203
\305\207\306c\210\307y\210\310\207" [beginning first re-search-forward "^@menu" goto-end t "\n\n" -2 nil] 4 (#$ . 11494)])
#@485 Copy the old menu line descriptions that exist to the new menu.

Point must be at beginning of old menu.

If the node-name of the new menu is found in the old menu, insert the
old description into the new entry.

For this function, the new menu is a list made up of lists of dotted
pairs in which the first element of the pair is the node name and the
second element the description.  The new menu is changed destructively.
The old menu is the menu as it appears in the Texinfo file.
(defalias 'texinfo-incorporate-descriptions #[(new-menu-list) "\304 	\305\211\2034@\212\306\307\310\n@!\311\312\313\310\n@!\314\315\260\316#\203,\n\317!\241\210)A\211\204\305	+\207" [end-of-menu new-menu-list new-menu --dolist-tail-- texinfo-menu-end nil re-search-forward "\\* \\(" regexp-quote "::" "\\|" ".*: " "[.,	\n]" "\\)" t texinfo-menu-copy-old-description] 10 (#$ . 12188)])
#@637 Copy any old menu entry names to the new menu.

Point must be at beginning of old menu.

If the node-name of the new menu entry cannot be found in the old
menu, do nothing.

For this function, the new menu is a list made up of lists of dotted
pairs in which the first element of the pair is the node name and the
second element is the description (or nil).

If we find an existing menu entry name, we change the first element of
the pair to be another dotted pair in which the car is the menu entry
name and the cdr is the node name.

NEW-MENU-LIST is changed destructively.  The old menu is the menu as it
appears in the texinfo file.
(defalias 'texinfo-incorporate-menu-entry-names #[(new-menu-list) "\304 	\305\211\2031@\212\306\307\310\311\n@!\312R\313#\203)\n\314\224\314\225{\n@B\240\210)A\211\204\305	+\207" [end-of-menu new-menu-list new-menu --dolist-tail-- texinfo-menu-end nil re-search-forward "\\* " "\\(.*\\): " regexp-quote "[.,	\n]" t 1] 6 (#$ . 13079)])
#@193 Return description field of old menu line as string.
Point must be located just after the node name.  Point left before description.
Single argument, END-OF-MENU, is position limiting search.
(defalias 'texinfo-menu-copy-old-description #[(end-of-menu) "\301\302w\210\303\304!\203\303\305!\204`\212\306\307\310#\210\311\312!){\207\313\207" [end-of-menu "[:.,	\n ]+" nil looking-at "\\(\\w+\\|@\\)" "\\(^\\* \\|^@detailmenu\\|^@end menu\\|^@ignore\\)" re-search-forward "\\(^\\* \\|^@ignore\\|^@end menu\\)" t line-end-position 0 ""] 5 (#$ . 14070)])
#@91 Return position of end of menu, but don't move point.
Signal an error if not end of menu.
(defalias 'texinfo-menu-end #[nil "\212\300\301\302\303#\203
`\202\304\305!)\207" [re-search-forward "^@end menu" nil t error "Menu does not have an end"] 4 (#$ . 14631)])
#@219 Delete the old menu.  Point must be in or after menu.
First argument is position of the beginning of the section in which
the menu will be located; second argument is the position of the first
node within the section.
(defalias 'texinfo-delete-old-menu #[(beginning first) "\302\303\"\210`\212\304\305	\"\210`)|\207" [beginning first re-search-backward "^@menu" re-search-forward "^@end menu"] 4 (#$ . 14903)])
#@55 Column at which descriptions start in a Texinfo menu.
(defvar texinfo-column-for-description 32 (#$ . 15321))
#@704 Insert formatted menu at point.
Indents the first line of descriptions, if any, to the value of
texinfo-column-for-description.  Indenting leaves trailing whitespace
in a menu that lacks descriptions, so descriptions will format well.
In general, a menu should contain descriptions, because node names and
section titles are often too short to explain a node well.

MENU-LIST has form:

    (("node-name1" . "description")
    ("node-name2" . "description") ... )

However, the description field might be nil.

Also, the node-name field might itself be a dotted pair (call it P) of
strings instead of just a string.  In that case, the car of P
is the menu entry name, and the cdr of P is the node name.
(defalias 'texinfo-insert-menu #[(menu-list node-name) "\306c\210\307\211\203J\n@\310c\210	@\211;\203\"\311\312\"c\210\202+\311\313@A#c\210)	AG\314V\203@\315\f\316\"\210\311\317	A\"c\210\320c\210\nA\211\204*\321c\210\322 \323\324
#)\207" [menu-list menu --dolist-tail-- node-part texinfo-column-for-description level "@menu\n" nil "* " format "%s::" "%s: %s." 0 indent-to 2 "%s" "\n" "@end menu" texinfo-hierarchic-level message "Updated level \"%s\" menu following node: %s ... " node-name] 5 (#$ . 15438)])
#@335 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.
(defalias 'texinfo-start-menu-description #[nil "\305\211\211\211\212\306 \210\307\310\311 \312#\203\313\305w\210`\202\"\314\315!\210\307\316\311 \312#\203@\317\320!\2035\314\321!\210\322\305x\210`{\202\226\307\323\311 \312#\203\222\313\305w\210`\324\325\326\327!\312#\203n\317\320!\203c\314\321!\210\330\305x\210`{\202\226\324\331\326\327!\312#\210\332\305x\210`{\211G\333U\203\214\314\334!\210\202\226\335c\210\202\226\314\334!\210\324\336\337	!\331\340\341\342\343\342\344\345\260\n\305\312#\203\300\346v\210\313\305w\210`\305\210\313\305x\210`{\202\304\314\347!\210)\305\210`\212\313\305x\210`)|\210\350\f\327\"\210\212c-\207" [title node-name end beginning texinfo-column-for-description nil beginning-of-line search-forward "* " line-end-position t " 	" error "This is not a line in a menu" "::" looking-at "[ 	]*[^ 	\n]+" "Descriptive text already exists" ": 	" ":" re-search-forward "[.,	]" line-beginning-position 2 "., 	" ".*\n" " 	\n" 0 "No node name on this line" "." "^@node[ 	]+" regexp-quote "\\(" "\\(\\(^@c \\|^@comment\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" 1 "Cannot find node to match node name in menu entry" indent-to] 12 (#$ . 16675) nil])
#@237 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.
(defalias 'texinfo-indent-menu-description #[(column &optional region-p) "\212\214~\210\204\302\303!\210\304	!\210\305\306!\2027\305\307!\210\310 b\210`\311 W\2034\312 \2034\313y\210\304	!\210\202\305\314!*\207" [region-p column re-search-forward "^@menu" texinfo-menu-indent-description message "Indented descriptions in menu.  You may save the buffer." "Indenting every menu description in region... " region-beginning region-end texinfo-locate-menu-p 1 "Indenting done.  You may save the buffer."] 2 (#$ . 18243) "nIndent menu descriptions to (column number): \nP"])
#@258 Indent the Texinfo file menu description to TO-COLUMN-NUMBER.
Start with point just after the word `menu' in the `@menu' line and
leave point on the line before the `@end menu' line.  Does not indent
second and subsequent lines of a multi-line description.
(defalias 'texinfo-menu-indent-description #[(to-column-number) "`\211\212\303 b\210\304 \210`)W\2057\305\306\303 \307#\203.`\310\311w\210\312\313!\203-	`|\210\nj\210)\314y\210`\211\202)\207" [beginning-of-next-line beginning-white-space to-column-number texinfo-menu-end beginning-of-line re-search-forward "\\* \\(.*::\\|.*: [^.,	\n]+[.,	]\\)" t " 	" nil looking-at "\\(@\\|\\w\\)+" 1] 5 (#$ . 19064)])
#@2452 Make a master menu for a whole Texinfo file.
Remove pre-existing master menu, if there is one.

This function supports only single-file manuals.  For multi-file
manuals, use `texinfo-multiple-files-update'.

This function creates or updates the @detailmenu section of a
master menu that follows the Top node.  It replaces any existing
detailed menu that follows the top node.  The detailed menu
includes every entry from all the other menus.  By default, the
existing menus, including the menu in the Top node, are not
updated according to the buffer contents, so all the menus should
be updated first using `texinfo-make-menu' or
`texinfo-all-menus-update', which see.  Alternatively, invoke
this function with a prefix argument, see below.

Non-nil, non-numeric argument (C-u prefix, if interactive) means
first update all existing menus in the buffer (incorporating
descriptions from pre-existing menus) before it constructs the
master menu.  If the argument is numeric (e.g., "C-u 2"),
update all existing nodes as well, by calling
`texinfo-update-node' on the entire file.  Warning: do NOT
invoke with a numeric argument if your Texinfo file uses @node
lines without the `Next', `Previous', `Up' pointers, as the
result could be an invalid Texinfo file!

The function removes and recreates the detailed part of an already
existing master menu.  This action assumes that the pre-existing
master menu uses the standard `texinfo-master-menu-header' for the
detailed menu.

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.

Indents the first line of descriptions, and leaves trailing whitespace
in a menu that lacks descriptions, so descriptions will format well.
In general, a menu should contain descriptions, because node names and
section titles are often too short to explain a node well.
(defalias 'texinfo-master-menu #[(update-all-nodes-menus-p) "\305~\210eb\210\306\307\310\305#\204\311\312!\210\212\306\313\310\305#\204 \311\314!\210`)\315\n	\305#\203J\316\317\320\321!\305#\210\322\224b\210\212\323 b\210\324 \210\325u\210`)`|\210))\f\203j\f\247\203_\326\327\330 \"\210\331ed\"\210\326\332\330 \"\210\333ed\"\210\326\334\330 \"\210eb\210\335\336 !\210\212eb\210\315\n\310\305#\203\231\322\224b\210\316\317\320\321!\305#\210\337c\210\340 \210eb\210\306\341!\210\325y\210\340 \210\306\342!\210\343y\210\340 \210)\326\344!)\207" [case-fold-search first-chapter texinfo-master-menu-header end-of-detailed-menu-descriptions update-all-nodes-menus-p t re-search-forward "^@node [ 	]*top[ 	]*\\(,\\|$\\)" nil error "This buffer needs a Top node" "^@node" "Too few nodes for a master menu" search-forward search-backward "\n@detailmenu" line-beginning-position -2 0 texinfo-menu-end beginning-of-line -1 message "Making a master menu in %s ...first updating all nodes... " buffer-name texinfo-update-node "Updating all menus in %s ... " texinfo-make-menu "Now making the master menu in %s... " texinfo-insert-master-menu-list texinfo-master-menu-list "\n" delete-blank-lines "^@menu" "^@end menu" 1 "Done...completed making master menu.  You may save the buffer."] 4 (#$ . 19742) "P"])
#@391 Return a list of menu entries and header lines for the master menu.

Start with the menu for chapters and indices and then find each
following menu and the title of the node preceding that menu.

The master menu list has this form:

    (((... "entry-1-2"  "entry-1") "title-1")
      ((... "entry-2-2"  "entry-2-1") "title-2")
      ...)

However, there does not need to be a title field.
(defalias 'texinfo-master-menu-list #[nil "\301\302 \203\303 \304 DB\202\237)\207" [master-menu-list nil texinfo-locate-menu-p texinfo-copy-menu texinfo-copy-menu-title] 2 (#$ . 23506)])
#@58 Format and insert the master menu in the current buffer.
(defalias 'texinfo-insert-master-menu-list #[(master-menu-list) "eb\210\306\307\310\311#\204\312\313!\210\212\306\314!\210`)\306\315\311#\204#\312\316!\210)\317 \210`\212\306\320!\210`)|\210\212\310\321c\210\322\323\n@@\"\210\324\n@@!\310\211\203Z\f@\325\326\261\210\fA\211\204J*\nA\211@@\203k\311\327
Pc\210\n\310\211\203\265\f@\322\330\211A@)\"\210\326\211A@)\331\261\210\324@!\310\211\203\255\f@\325\326\261\210\fA\211\204\235*\fA\211\204t*	\203\275\332c\210\333c*\207" [first-chapter master-menu-inserted-p master-menu-list entry --dolist-tail-- texinfo-master-menu-header re-search-forward "^@node [ 	]*top[ 	]*\\(,\\|$\\)" nil t error "This buffer needs a Top node" "^@node\\|^@include" "^@menu" "Buffer lacks a menu in its first node; create it, then run me again" beginning-of-line "^@end menu" "\n@menu\n" message "Inserting chapter menu entry: %s ... " reverse "* " "\n" "\n@detailmenu\n" "Inserting menu for %s .... " "\n\n" "\n@end detailmenu" "\n@end menu\n\n" menu x] 5 (#$ . 24097)])
#@174 Find the next menu in the texinfo file.
If found, leave point after word `menu' on the `@menu' line, and return t.
If a menu is not found, do not move point and return nil.
(defalias 'texinfo-locate-menu-p #[nil "\300\301\302\303#\207" [re-search-forward "\\(^@menu\\)" nil t] 4 (#$ . 25205)])
#@142 Return the title of the section preceding the menu as a string.
If such a title cannot be found, return an empty string.  Do not move
point.
(defalias 'texinfo-copy-menu-title #[nil "\302\212\303\304\305	\306R\307\302#\203\"\310 \210\311v\210\312\307w\210`\307\210`{\202#\313*\207" [case-fold-search texinfo-section-types-regexp t re-search-backward "\\(^@top" "\\|" "\\)" nil beginning-of-line 1 " 	" ""] 5 (#$ . 25506)])
#@172 Return the entries of an existing menu as a list.
Start with point just after the word `menu' in the `@menu' line
and leave point on the line before the `@end menu' line.
(defalias 'texinfo-copy-menu #[nil "\303\304 \212	b\210\305\306\303\307#\204\310\311!\210`)`\nW\2039\312\306	\307#\203`\212\312\313\303\307#\210`\314Z){B\202+\207" [this-menu-list end-of-menu last-entry nil texinfo-menu-end re-search-backward "^\\* " t error "No entries in menu" re-search-forward "\\(^\\* \\|^@e\\)" 3] 5 (#$ . 25940)])
#@316 Return the specific type of next section, as a string.
For example, "unnumberedsubsec".  Return "top" for top node.

Searches forward for a section.  Hence, point must be before the
section whose type will be found.  Does not move point.  Signal an
error if the node is not the top node and a section is not found.
(defalias 'texinfo-specific-section-type #[nil "\302\212\303\304\305\302#\203\306\202(\303	\305\302#\203%\307\310 \210`T\311v\210`\"\202(\312\313!*\207" [case-fold-search texinfo-section-types-regexp t re-search-forward "^@node [ 	]*top[ 	]*\\(,\\|$\\)" nil "top" buffer-substring-no-properties beginning-of-line 1 error "texinfo-specific-section-type: Chapter or section not found"] 4 (#$ . 26469)])
#@135 Return the general hierarchical level of the next node in a texinfo file.
Thus, a subheading or appendixsubsec is of type subsection.
(defalias 'texinfo-hierarchic-level #[nil "\303\304\305 	\"\211A@*\207" [case-fold-search texinfo-section-list x t assoc texinfo-specific-section-type] 4 (#$ . 27198)])
#@266 Locate beginning of higher level section this section is within.
Return position of the beginning of the node line; do not move point.
Thus, if this level is subsection, searches backwards for section node.
Only argument is a string of the general type of section.
(defalias 'texinfo-update-menu-region-beginning #[(level) "\303	\304W\203\212eb\210\305\306\307\303#\210\310 )\2020\212\311\312\313\314\315\314\316\317\320\321	\n\"A!\260\307\322#\210`))\207" [case-fold-search level texinfo-update-menu-higher-regexps t 3 re-search-forward "^@node [ 	]*top[ 	]*\\(,\\|$\\)" nil line-beginning-position re-search-backward "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" eval assoc goto-beginning] 12 (#$ . 27510)])
#@299 Locate end of higher level section this section is within.
Return position; do not move point.  Thus, if this level is a
subsection, find the node for the section this subsection is within.
If level is top or chapter, returns end of file.  Only argument is a
string of the general type of section.
(defalias 'texinfo-update-menu-region-end #[(level) "\303\212\304\305\306\307\310\307\311\312\313\314	\n\"A!\260\315\316#\203\317\224\202 d*\207" [case-fold-search level texinfo-update-menu-higher-regexps t re-search-forward "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)" "\\|" "\\(^@ifinfo[ ]*\n\\)" "\\(^@ifnottex[ ]*\n\\)" "\\)?" eval assoc nil goto-end 1] 12 (#$ . 28291)])
#@330 Locate first node of the section the menu will be placed in.
Return position; do not move point.
The menu will be located just before this position.

First argument is the position of the beginning of the section in
which the menu will be located; second argument is the position of the
end of that region; it limits the search.
(defalias 'texinfo-menu-first-node #[(beginning end) "\212b\210\302y\210\303\304	\305#\210\306 )\207" [beginning end 1 re-search-forward "^@node" t line-beginning-position] 4 (#$ . 28976)])
#@1069 Without any prefix argument, update the node in which point is located.
Interactively, a prefix argument means to operate on the region.

Warning: do NOT use this function if your Texinfo file uses @node
lines without the `Next', `Previous', `Up' pointers, because the
result could be an invalid Texinfo file due to known deficiencies
in this command: it does not support @ignore and @if* directives.

The functions for creating or updating nodes and menus, and their
keybindings, are:

    texinfo-update-node (&optional beginning end)    \[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.
(defalias 'texinfo-update-node #[(&optional beginning end) "\204\303\304\305e\306#\204\307\310!\210\311 \210\312\313!)\207\303\212\214\n}\210eb\210\314\305d\306#\2036\315 \210\311 \210\202%db\210\312\316!+\207" [beginning auto-fill-function end nil re-search-backward "^@node" t error "Node line not found before this position" texinfo-update-the-node message "Done...updated the node.  You may save the buffer." re-search-forward beginning-of-line "Done...nodes updated in region.  You may save the buffer."] 4 (#$ . 29504) (byte-code "\205`\301 D\207" [prefix-arg mark] 2)])
#@302 Update every node in a Texinfo file.

Warning: do NOT use this function if your Texinfo file uses @node
lines without the `Next', `Previous', `Up' pointers, because the
result could be an invalid Texinfo file due to known deficiencies
in this command: it does not support @ignore and @if* directives.
(defalias 'texinfo-every-node-update #[nil "\212\300ed\"\210\301\302!)\207" [texinfo-update-node message "Done...updated every node.  You may save the buffer."] 3 (#$ . 31169) nil])
#@105 Update one node.  Point must be at the beginning of node line.
Leave point at the end of the node line.
(defalias 'texinfo-update-the-node #[nil "\304 \210\305 \210\306\307\310 \"\210\214~\210\311\312 \313	!\314	!	\315=\203'\316 \202>\317\n	\320$\210\317\n	\321$\210\317\n	\322$\210\323 -\207" [case-fold-search level beginning end texinfo-check-for-node-name texinfo-delete-existing-pointers message "Updating node: %s ... " texinfo-copy-node-name t texinfo-hierarchic-level texinfo-update-menu-region-beginning texinfo-update-menu-region-end 1 texinfo-top-pointer-case texinfo-insert-pointer next previous up texinfo-clean-up-node-line] 5 (#$ . 31659)])
#@300 Insert pointers in the Top node.  This is a special case.

The `Next' pointer is a pointer to a chapter or section at a lower
hierarchical level in the file.  The `Previous' and `Up' pointers are
to `(dir)'.  Point must be at the beginning of the node line, and is
left at the end of the node line.
(defalias 'texinfo-top-pointer-case #[nil "\300 \210\301\212\302\303\304\305#\203\306 \210\307 \202\310)\311\261\207" [texinfo-clean-up-node-line ", " re-search-forward "^@node" nil t beginning-of-line texinfo-copy-node-name " " ", (dir), (dir)"] 5 (#$ . 32331)])
#@132 Determine whether the node has a node name.  Prompt for one if not.
Point must be at beginning of node line.  Does not move point.
(defalias 'texinfo-check-for-node-name #[nil "\212\302 \303v\210\304\305w\210\306\307!?\205\310\311\"\312	\261)*\207" [initial node-name texinfo-copy-next-section-title 1 " 	" nil looking-at "[^,	\n ]+" read-from-minibuffer "Node name (use no @, commas, colons, or apostrophes): " " "] 3 (#$ . 32906)])
#@248 Delete `Next', `Previous', and `Up' pointers.
Starts from the current position of the cursor, and searches forward
on the line for a comma and if one is found, deletes the rest of the
line, including the comma.  Leaves point at beginning of line.
(defalias 'texinfo-delete-existing-pointers #[nil "\301 \302\303\304#\203`S|\210)\305 \207" [eol-point line-end-position search-forward "," t beginning-of-line] 4 (#$ . 33353)])
#@843 Move point to section associated with next, previous, or up pointer.
Return type of pointer (either `normal' or `no-pointer').

The first and second arguments bound the search for a pointer to the
beginning and end, respectively, of the enclosing higher level
section.  The third argument is a string specifying the general kind
of section such as "chapter" or "section".  When looking for the
`Next' pointer, the section found will be at the same hierarchical
level in the Texinfo file; when looking for the `Previous' pointer,
the section found will be at the same or higher hierarchical level in
the Texinfo file; when looking for the `Up' pointer, the section found
will be at some level higher in the Texinfo file.  The fourth argument
(one of 'next, 'previous, or 'up) specifies whether to find the
`Next', `Previous', or `Up' pointer.
(defalias 'texinfo-find-pointer #[(beginning end level direction) "\306	\307=\203$\310y\210\311\312\313\314\315\n\"A!Q\f\306#\203 \316\202\201\317\202\201	\320=\203S\321\322\312\313\314\315\n\"A!\323\312\313\314\315\n
\"A!\323\324\325\260\306#\203O\316\202\201\317\202\201	\326=\203~\321\322\312\313\314\315\n
\"A!\323\324\325\260\212b\210\327 )\306#\203z\316\202\201\317\202\201\330\331!)\207" [case-fold-search direction level texinfo-update-menu-same-level-regexps end texinfo-update-menu-higher-regexps t next 3 re-search-forward "\\(^@node\\).*\n" "\\(\\(\\(^@c\\).*\n\\)\\|\\(^@ifinfo[ ]*\n\\)\\|\\(^@ifnottex[ ]*\n\\)\\)?" eval assoc normal no-pointer previous re-search-backward "\\(" "\\|" "^@node [ 	]*top[ 	]*\\(,\\|$\\)" "\\)" up line-beginning-position error "texinfo-find-pointer: lack proper arguments" beginning] 12 (#$ . 33790)])
#@123 Return the node name preceding the section command.
The argument is the kind of section, either `normal' or `no-pointer'.
(defalias 'texinfo-pointer-name #[(kind) "\302	\303=\203\302\210\304\305\306\307!\310#\210\311 \202!	\312=\203!\313)\207" [name kind nil normal re-search-backward "^@node" line-beginning-position -2 t texinfo-copy-node-name no-pointer " "] 4 (#$ . 35507)])
#@425 Insert the `Next', `Previous' or `Up' node name at point.
Move point forward.

The first and second arguments bound the search for a pointer to the
beginning and end, respectively, of the enclosing higher level
section.  The third argument is the hierarchical level of the Texinfo
file, a string such as "section".  The fourth argument is direction
towards which the pointer is directed, one of `next', `previous', or `up'.
(defalias 'texinfo-insert-pointer #[(beginning end level direction) "\304\210\305\212\306\307	\n$!)\261\207" [beginning end level direction nil ", " texinfo-pointer-name texinfo-find-pointer] 7 (#$ . 35902)])
#@51 Remove extra commas, if any, at end of node line.
(defalias 'texinfo-clean-up-node-line #[nil "\300\210\301\300x\210`\302 |\207" [nil ", " line-end-position] 2 (#$ . 36545)])
#@717 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.
(defalias 'texinfo-sequential-node-update #[(&optional region-p) "\204\304\305\306e\307#\204\310\311!\210\312 \210\313\314!)\207\304\315 \316 \nU\203,\310\317!\210\214\n}\210b\210\320`\307\"\210\321\306d\307#\203J\322 \210\312 \210\2029\313\323!,\207" [region-p auto-fill-function end beginning nil re-search-backward "^@node" t error "Node line not found before this position" texinfo-sequentially-update-the-node message "Done...sequentially updated the node .  You may save the buffer." region-beginning region-end "Please mark a region" push-mark re-search-forward beginning-of-line "Done...updated the nodes in sequence.  You may save the buffer."] 4 (#$ . 36728) "P"])
#@168 Update one node such that the pointers are sequential.
A `Next' or `Previous' pointer points to any preceding or following node,
regardless of its hierarchical level.
(defalias 'texinfo-sequentially-update-the-node #[nil "\302 \210\303 \210\304\305\306 \"\210\214~\210\307\310 \211\311=\203\312 \2020\313	\314\"\210\313	\315\"\210\313	\316\"\210\317 +\207" [case-fold-search level texinfo-check-for-node-name texinfo-delete-existing-pointers message "Sequentially updating node: %s ... " texinfo-copy-node-name t texinfo-hierarchic-level 1 texinfo-top-pointer-case texinfo-sequentially-insert-pointer next previous up texinfo-clean-up-node-line] 4 (#$ . 38141)])
#@245 Insert the `Next', `Previous' or `Up' node name at point.
Move point forward.

The first argument is the hierarchical level of the Texinfo file, a
string such as "section".  The second argument is direction, one of
`next', `previous', or `up'.
(defalias 'texinfo-sequentially-insert-pointer #[(level direction) "\302\210\303\212\304\305	\"!)\261\207" [level direction nil ", " texinfo-pointer-name texinfo-sequentially-find-pointer] 5 (#$ . 38816)])
#@597 Find next or previous pointer sequentially in Texinfo file, or up pointer.
Move point to section associated with the pointer.  Find point even if
it is in a different section.

Return type of pointer (either `normal' or `no-pointer').

The first argument is a string specifying the general kind of section
such as "chapter" or "section".  The section found will be at the
same hierarchical level in the Texinfo file, or, in the case of the up
pointer, some level higher.  The second argument (one of `next',
`previous', or `up') specifies whether to find the `Next', `Previous',
or `Up' pointer.
(defalias 'texinfo-sequentially-find-pointer #[(level direction) "\305	\306=\203\307y\210\310\nd\305#\203\311\202P\312\202P	\313=\2031\314\ne\305#\203-\311\202P\312\202P	\315=\203M\314\316\317\f\"A!e\305#\203I\311\202P\312\202P\320\321!)\207" [case-fold-search direction texinfo-section-types-regexp level texinfo-update-menu-higher-regexps t next 3 re-search-forward normal no-pointer previous re-search-backward up eval assoc error "texinfo-sequential-find-pointer: lack proper arguments"] 5 (#$ . 39276)])
#@253 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.
(defalias 'texinfo-insert-node-lines #[(beginning end &optional title-p) "\306\211\211\211\307\f\310\"\210\311 
b\210\312\n\304#\203}\2030\313 \210\314v\210\315\306w\210`\316 {\317\320\2069\321\322!\310#\203D\314v\210\202M\313 \210\323c\210\322u\210\203l\315\306w\210\324\325!\204l\313 \210\314v\210\326	\261\210\327\330	\"\210\312\321\331!\310#\210`\314y\210\202\332
!\210\203\214\327\333!\202\217\327\334!,\207" [last-section-position title end-marker beginning-marker end beginning nil push-mark t mark-marker re-search-forward beginning-of-line 1 " 	" line-end-position re-search-backward "^@node" line-beginning-position -1 "@node\n" looking-at "[^,	\n ]+" " " message "Inserted title %s ... " 4 set-mark "Done inserting node lines and titles.  You may save the buffer." "Done inserting node lines.  You may save the buffer." texinfo-section-types-regexp title-p] 4 (#$ . 40404) "r\nP"])
#@52 Return a list of the included files in OUTER-FILE.
(defalias 'texinfo-multi-file-included-list #[(outer-file) "C\303r\304!q\210~\210eb\210\305\306\303\307#\203.\310\303w\210`\303\210\310\303x\210	`{\nB\202\n\237+\207" [outer-file start included-file-list nil find-file-noselect re-search-forward "^@include" t " 	"] 4 (#$ . 41585)])
#@200 Return the name of the immediately following section as a string.

Start with point at the beginning of the node line.  Leave point at the
same place.  If there is no title, returns an empty string.
(defalias 'texinfo-copy-next-section-title #[nil "\212\302\210\212\303\304\302\305#\205\306\224)\206d\303	\305#\2030\307 \210\310v\210\311\302w\210`\302\210`{\2021\312*\207" [node-end texinfo-section-types-regexp nil re-search-forward "\\(^@node\\)" t 0 beginning-of-line 1 " 	" ""] 5 (#$ . 41935)])
#@998 Update first node pointers in each file in FILES.
Return a list of the node names.

The first file in the list is an outer file; the remaining are
files included in the outer file with `@include' commands.

If optional arg UPDATE-EVERYTHING non-nil, update every menu and
pointer in each of the included files.

Also update the `Top' level node pointers of the outer file.

Requirements:

  * the first file in the FILES list must be the outer file,
  * each of the included files must contain exactly one highest
    hierarchical level node,
  * this 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.

However, when an included file does not have any node lines in
it, this command does not try to create a menu entry for it.
Consequently, you can include any file, such as a version or an
update file without node lines, not just files that are
chapters.
(defalias 'texinfo-multi-file-update #[(files &optional update-everything) "\306\307\211\211\211
\203-\310
@!q\210~\210eb\210\311\312\307\306#\203&
@B
A\211\204\237\310A@!q\210~\210eb\210\311\312\307\306#\210\313 \210\314 \210\315 \211\316\317y\210BB\310\211A@!q\210eb\210\311\320\307\306#\204l\321\322!\210\313 \210\323 \210\307\210\324\n\325\261\210\313 \210\326\203\345A\204\216\316\202\262\310A@!q\210~\210eb\210\311\312\307\306#\210\313 \210\314 \210\315 \211\316\317y\210BB\310@!q\210eb\210\313 \210\203\307\327\306!\210\313 \210\323 \210\307\210\324\n\324	\330\261\210\313 \210\315 A\211\204\204\237-\207" [files-with-node-lines previous-node-name next-node-name menu-list case-fold-search files t nil find-file-noselect re-search-forward "^@node" beginning-of-line texinfo-check-for-node-name texinfo-copy-node-name "" 1 "^@node [ 	]*top[ 	]*\\(,\\|$\\)" error "This buffer needs a Top node" texinfo-delete-existing-pointers ", " ", (dir), (dir)" "Top" texinfo-all-menus-update ", Top" update-everything] 6 (#$ . 42451)])
#@139 Insert formatted main menu at point.
Indents the first line of the description, if any, to the value of
`texinfo-column-for-description'.
(defalias 'texinfo-multi-files-insert-main-menu #[(menu-list) "\305c\210\306\211\203G\n@\307c\210	@\211;\203\"\310\311\"c\210\202+\310\312@A#c\210)	A\203=\313\f\314\"\210\310\315	A\"c\210\316c\210\nA\211\204*\317c\207" [menu-list entry --dolist-tail-- node-part texinfo-column-for-description "@menu\n" nil "* " format "%s::" "%s: %s." indent-to 2 "%s" "\n" "@end menu"] 5 (#$ . 44530)])
#@257 Return master menu list from files in FILES-LIST.
Menu entries in each file collected using `texinfo-master-menu-list'.

The first file in FILES-LIST must be the outer file; the others must
be the files included within it.  A main menu must already exist.
(defalias 'texinfo-multi-file-master-menu-list #[(files-list) "\212\304	\304\211\203(@\305\n!q\210\306\307p\"\210eb\210\310\311 \"A\211\204**\207" [master-menu-list files-list file --dolist-tail-- nil find-file-noselect message "Working on: %s " append texinfo-master-menu-list] 4 (#$ . 45078)])
#@1789 Update first node pointers in each file included in OUTER-FILE;
create or update the `Top' level node pointers and the 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 in addition to creating or updating
pointers in the first @node line in each included file and creating or
updating the `Top' level node pointers of the outer file.  This does
not create or update other menus and 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.  Also, update the `Top' level node
pointers of OUTER-FILE.  Do NOT invoke this command with a numeric prefix
arg, if your files use @node lines without the `Next', `Previous', `Up'
pointers, because this could produce invalid Texinfo files due to known
deficiencies in `texinfo-update-node': it does not support the @ignore
and @if... directives.

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.
(defalias 'texinfo-multiple-files-update #[(outer-file &optional make-master-menu update-everything) "\306!\211\307\211\310\n
\"\"\311	@!q\210\312e\212\313\314!\210\315 )\"\203>\316\"!\210\317 \210`\212\313\320!\210`)|\210\321\"!\210\202C\321\"!\210#\203{eb\210\322$\307\323#\203u\324\224b\210\325\326\315\327!\323#\210\212\330 b\210\317 \210\331u\210`)%`%|\210)\332\333	!!\210-\212eb\210\313\334!\210\331y\210\335c\210\336 \210\313\320!\210\337y\210\335c\210\336 \210)\340\341!\207" [outer-file included-file-list files next-node-name previous-node-name update-everything texinfo-multi-file-included-list nil texinfo-multi-file-update find-file-noselect texinfo-old-menu-p re-search-forward "^@include" line-beginning-position texinfo-incorporate-descriptions beginning-of-line "^@end menu" texinfo-multi-files-insert-main-menu search-forward t 0 search-backward "\n@detailmenu" -2 texinfo-menu-end -1 texinfo-insert-master-menu-list texinfo-multi-file-master-menu-list "^@menu" "\n" delete-blank-lines 1 message "Multiple files updated." main-menu-list make-master-menu texinfo-master-menu-header end-of-detailed-menu-descriptions] 5 (#$ . 45651) (byte-code "\301\302\303 \"\204
\304\202<\203\305\202\247\205\306B\207" [current-prefix-arg read-string "Name of outer `include' file: " buffer-file-name (nil nil) (t nil) (t t)] 3)])
(provide 'texnfo-upd)