Mercurial > emacs
comparison lisp/info.el @ 732:a8d94735277e
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Tue, 30 Jun 1992 13:54:21 +0000 |
parents | f99c8512cd41 |
children | b096f4af925c |
comparison
equal
deleted
inserted
replaced
731:5c6db33a9ef6 | 732:a8d94735277e |
---|---|
976 "Found %d other entr%. Use \\[Info-last] to see %s." | 976 "Found %d other entr%. Use \\[Info-last] to see %s." |
977 (1- num-matches) | 977 (1- num-matches) |
978 (if (> num-matches 2) "ies" "y") | 978 (if (> num-matches 2) "ies" "y") |
979 (if (> num-matches 2) "them" "it")))))) | 979 (if (> num-matches 2) "them" "it")))))) |
980 (error "Couldn't find documentation for %s." command)))) | 980 (error "Couldn't find documentation for %s." command)))) |
981 ;;;###autoload | |
982 (define-key help-map "\C-f" 'Info-goto-emacs-command-node) | |
983 | 981 |
984 ;;;###autoload | 982 ;;;###autoload |
985 (defun Info-goto-emacs-key-command-node (key) | 983 (defun Info-goto-emacs-key-command-node (key) |
986 "Go to the Info node in the Emacs manual the command bound to KEY, a string. | 984 "Go to the Info node in the Emacs manual the command bound to KEY, a string. |
987 Interactively, if the binding is execute-extended-command, a command is read." | 985 Interactively, if the binding is execute-extended-command, a command is read." |
993 (eq command 'execute-extended-command)) | 991 (eq command 'execute-extended-command)) |
994 (Info-goto-emacs-command-node | 992 (Info-goto-emacs-command-node |
995 (read-command "Find documentation for command: "))) | 993 (read-command "Find documentation for command: "))) |
996 (t | 994 (t |
997 (Info-goto-emacs-command-node command))))) | 995 (Info-goto-emacs-command-node command))))) |
998 ;;;###autoload | |
999 (define-key help-map "\C-k" 'Info-goto-emacs-key-command-node) | |
1000 | 996 |
1001 (provide 'info) | 997 (provide 'info) |
1002 | 998 |
1003 ;;; info.el ends here | 999 ;;; info.el ends here |