Mercurial > emacs
changeset 37370:3a3bed48a714
(Info-menu-update): When there are no menus and/or no
cross references in the node, make the respective items of the
Info menu-bar menu inactive.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Tue, 17 Apr 2001 20:28:29 +0000 |
parents | 3a46eb992548 |
children | 855c7db27c94 |
files | lisp/info.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/info.el Tue Apr 17 17:45:48 2001 +0000 +++ b/lisp/info.el Tue Apr 17 20:28:29 2001 +0000 @@ -2166,7 +2166,7 @@ (if items (setq entries (cons ["Other..." Info-menu t] entries))) (or entries - (setq entries (list ["No menu" nil nil]))) + (setq entries (list ["No menu" nil nil] nil :active))) (easy-menu-change '("Info") "Menu Item" (nreverse entries))) ;; Update reference menu. Code stolen from `Info-follow-reference'. (let ((items nil) @@ -2198,7 +2198,7 @@ (setq entries (cons ["Other..." Info-follow-reference t] entries))) (or entries - (setq entries (list ["No references" nil nil]))) + (setq entries (list ["No references" nil nil] nil :active))) (easy-menu-change '("Info") "Reference" (nreverse entries))) ;; Update last seen node. (setq Info-menu-last-node (list Info-current-file Info-current-node)))