summaryrefslogtreecommitdiff
path: root/lisp/woman.el
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2005-01-15 12:46:54 +0000
committerEli Zaretskii <eliz@gnu.org>2005-01-15 12:46:54 +0000
commitf79b331a48a9e8391e30d3cd624afc20f1b136b6 (patch)
tree67699a642143d3743301986120169c2cf114149d /lisp/woman.el
parent8b3a75ac8f9fb619b3136a811b34e9d36ec4e2b8 (diff)
downloademacs-f79b331a48a9e8391e30d3cd624afc20f1b136b6.tar.gz
(woman-dired-define-key-maybe): If KEY is undefined,
lookup-key might return nil; handle that.
Diffstat (limited to 'lisp/woman.el')
-rw-r--r--lisp/woman.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/woman.el b/lisp/woman.el
index 610590a2972..e4b29374a05 100644
--- a/lisp/woman.el
+++ b/lisp/woman.el
@@ -1491,7 +1491,8 @@ Also make each path-info component into a list.
(defsubst woman-dired-define-key-maybe (key)
"If KEY is undefined in Dired, bind it to command `woman-dired-find-file'."
- (if (eq (lookup-key dired-mode-map key) 'undefined)
+ (if (or (eq (lookup-key dired-mode-map key) 'undefined)
+ (null (lookup-key dired-mode-map key)))
(woman-dired-define-key key)))
(defun woman-dired-define-keys ()