changeset 5771:96fd8c241b42

(calendar-mode-map): Pass (keymap) as KEYMAP arg to where-is-internal.
author Richard M. Stallman <rms@gnu.org>
date Fri, 04 Feb 1994 06:44:55 +0000
parents 92dd602768d2
children daac61915408
files lisp/calendar/calendar.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calendar/calendar.el	Fri Feb 04 04:45:52 1994 +0000
+++ b/lisp/calendar/calendar.el	Fri Feb 04 06:44:55 1994 +0000
@@ -1434,7 +1434,7 @@
                  'copy-region-as-kill 'downcase-region 'upcase-region
                  'capitalize-region 'write-region)))
     (while (car l)
-      (let ((k (where-is-internal (car l))))
+      (let ((k (where-is-internal (car l) '(keymap))))
         (while (car k)
           (define-key calendar-mode-map (car k) 'calendar-not-implemented)
           (setq k (cdr k)))