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

Diff of /emacs/lisp/help-fns.el

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

revision 1.6 by kfstorm, Wed Feb 6 23:05:03 2002 UTC revision 1.7 by kfstorm, Sat Feb 23 22:27:39 2002 UTC
# Line 207  and the file name is displayed in the ec Line 207  and the file name is displayed in the ec
207      (princ ".")      (princ ".")
208      (terpri)      (terpri)
209      (when (commandp function)      (when (commandp function)
210        (let* ((binding (and (symbolp function) (commandp function)        (let* ((remapped (remap-command function))
                            (key-binding function nil t)))  
              (remapped (and (symbolp binding) (commandp binding) binding))  
211               (keys (where-is-internal               (keys (where-is-internal
212                     (or remapped function) overriding-local-map nil nil)))                     (or remapped function) overriding-local-map nil nil)))
213          (when remapped          (when remapped

Legend:
Removed from v.1.6  
changed lines
  Added in v.1.7

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