comparison lisp/help.el @ 68870:9cc0a5b4b6e7

(where-is): Fix displaying of remappings.
author Juanma Barranquero <lekktu@gmail.com>
date Tue, 14 Feb 2006 08:09:28 +0000
parents 284c53bcc6bf
children f8759a14f4cd 9e490faa9f6b
comparison
equal deleted inserted replaced
68869:443a9b04eefe 68870:9cc0a5b4b6e7
508 (format "%s (%s)" keys symbol)) 508 (format "%s (%s)" keys symbol))
509 (format "M-x %s RET" symbol)) 509 (format "M-x %s RET" symbol))
510 (if (> (length keys) 0) 510 (if (> (length keys) 0)
511 (if remapped 511 (if remapped
512 (format "%s is remapped to %s which is on %s" 512 (format "%s is remapped to %s which is on %s"
513 definition symbol keys) 513 symbol remapped keys)
514 (format "%s is on %s" symbol keys)) 514 (format "%s is on %s" symbol keys))
515 ;; If this is the command the user asked about, 515 ;; If this is the command the user asked about,
516 ;; and it is not on any key, say so. 516 ;; and it is not on any key, say so.
517 ;; For other symbols, its aliases, say nothing 517 ;; For other symbols, its aliases, say nothing
518 ;; about them unless they are on keys. 518 ;; about them unless they are on keys.