# HG changeset patch # User Richard M. Stallman # Date 780983620 0 # Node ID 712e13833ad87404dc6fabc853bd57c92e10198e # Parent af7bd3312376ea80e5c45a0884d1883ff98256d2 (edmacro-format-keys): Cope if local keymap is nil. diff -r af7bd3312376 -r 712e13833ad8 lisp/edmacro.el --- a/lisp/edmacro.el Fri Sep 30 21:26:44 1994 +0000 +++ b/lisp/edmacro.el Sat Oct 01 03:53:40 1994 +0000 @@ -379,7 +379,9 @@ (defun edmacro-format-keys (macro &optional verbose) (setq macro (edmacro-fix-menu-commands macro)) (let* ((maps (append (current-minor-mode-maps) - (list (current-local-map) (current-global-map)))) + (if (current-local-map) + (list (current-local-map))) + (list (current-global-map)))) (pkeys '(end-macro ?0 ?1 ?2 ?3 ?4 ?5 ?6 ?7 ?8 ?9 ?- ?\C-u ?\M-- ?\M-0 ?\M-1 ?\M-2 ?\M-3 ?\M-4 ?\M-5 ?\M-6 ?\M-7 ?\M-8 ?\M-9))