/[emacs]/emacs/lisp/help.el
ViewVC logotype

Diff of /emacs/lisp/help.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.279 by rms, Sun Apr 10 01:47:43 2005 UTC revision 1.280 by lute, Wed Apr 13 09:16:02 2005 UTC
# Line 590  the last key hit are used." Line 590  the last key hit are used."
590          ;; Don't bother user with strings from (e.g.) the select-paste menu.          ;; Don't bother user with strings from (e.g.) the select-paste menu.
591          (if (stringp (aref key (1- (length key))))          (if (stringp (aref key (1- (length key))))
592              (aset key (1- (length key)) "(any string)"))              (aset key (1- (length key)) "(any string)"))
593          (if (stringp (aref untranslated (1- (length untranslated))))          (if (and (> (length untranslated) 0)
594                     (stringp (aref untranslated (1- (length untranslated)))))
595              (aset untranslated (1- (length untranslated))              (aset untranslated (1- (length untranslated))
596                    "(any string)"))                    "(any string)"))
597          ;; Now describe the key, perhaps as changed.          ;; Now describe the key, perhaps as changed.
# Line 603  the last key hit are used." Line 604  the last key hit are used."
604                           key-desc                           key-desc
605                           (if (symbolp defn) defn (prin1-to-string defn)))))))))                           (if (symbolp defn) defn (prin1-to-string defn)))))))))
606    
   
607  (defun describe-key (key &optional untranslated up-event)  (defun describe-key (key &optional untranslated up-event)
608    "Display documentation of the function invoked by KEY.    "Display documentation of the function invoked by KEY.
609  KEY should be a key sequence--when calling from a program,  KEY should be a key sequence--when calling from a program,

Legend:
Removed from v.1.279  
changed lines
  Added in v.1.280

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26