Mercurial > emacs
changeset 30738:5d4414327c06
(Info-file-list-for-emacs): More elements for the
autotype, vip, ebrowse, cl, idlwave, reftex, widget, pcl-cvs,
and woman manuals.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Thu, 10 Aug 2000 12:56:02 +0000 |
parents | 8139b53e0669 |
children | fb9911db6ae3 |
files | lisp/info.el |
diffstat | 1 files changed, 23 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info.el Thu Aug 10 11:06:54 2000 +0000 +++ b/lisp/info.el Thu Aug 10 12:56:02 2000 +0000 @@ -2173,7 +2173,13 @@ (defvar Info-file-list-for-emacs '("ediff" "forms" "gnus" ("mh" . "mh-e") "sc" "message" - ("dired" . "dired-x") ("c" . "ccmode") "viper") + ("dired" . "dired-x") ("c" . "ccmode") "viper" "vip" + ("skeleton" . "autotype") ("auto-insert" . "autotype") + ("copyright" . "autotype") ("executable" . "autotype") + ("time-stamp" . "autotype") ("quickurl" . "autotype") + ("tempo" . "autotype") ("hippie-expand" . "autotype") + ("cvs" . "pcl-cvs") + "ebrowse" "cl" "idlwave" "reftex" "widget" "woman") "List of Info files that describe Emacs commands. An element can be a file name, or a list of the form (PREFIX . FILE) where PREFIX is a name prefix and FILE is the file to look in. @@ -2211,9 +2217,23 @@ (condition-case nil (Info-find-node info-file "Command Index") ;; Some manuals may not have a separate Command Index node, - ;; so try just Index instead. + ;; so try other variations as well. (error - (Info-find-node info-file "Index"))) + (condition-case nil + (Info-find-node info-file "Function Index") + (error + (condition-case nil + (Info-find-node info-file "Function and Variable Index") + (error + (condition-case nil + (Info-find-node info-file "Concept Index") + (error + (condition-case nil + (Info-find-node info-file "Index") + (error + (message "Info file `%s' seems to lack an Index" + info-file) + (sit-for 2))))))))))) ;; Take the index node off the Info history. (setq Info-history (cdr Info-history)) (goto-char (point-max))