Function: texinfo-menu-copy-old-description

texinfo-menu-copy-old-description is a byte-compiled function defined in texnfo-upd.el.gz.

Signature

(texinfo-menu-copy-old-description END-OF-MENU)

Documentation

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.

Source Code

;; Defined in /usr/src/emacs/lisp/textmodes/texnfo-upd.el.gz
(defun texinfo-menu-copy-old-description (end-of-menu)
  "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."
  (skip-chars-forward ":.,\t\n ")
  ;; don't copy a carriage return at line beginning with asterisk!
  ;; don't copy @detailmenu or @end menu or @ignore as descriptions!
  ;; do copy a description that begins with an `@'!
  ;; !! Known bug: does not copy descriptions starting with ^|\{?* etc.
  (if (and (looking-at "\\(\\w+\\|@\\)")
	   (not (looking-at
		 "\\(^\\* \\|^@detailmenu\\|^@end menu\\|^@ignore\\)")))
      (buffer-substring
       (point)
       (save-excursion
	 (re-search-forward "\\(^\\* \\|^@ignore\\|^@end menu\\)" end-of-menu t)
	 (line-end-position 0)))	; end of last description line
    ""))