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