# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1105793128 0
# Node ID 45a313bd59985c63c15bba76dd43f103d5e73f1e
# Parent  c759f8859f723171ca9dc7a05866a57221bf8789
(woman-dired-define-key-maybe): If KEY is undefined,
lookup-key might return nil; handle that.

diff -r c759f8859f72 -r 45a313bd5998 lisp/woman.el
--- a/lisp/woman.el	Sat Jan 15 12:39:25 2005 +0000
+++ b/lisp/woman.el	Sat Jan 15 12:45:28 2005 +0000
@@ -1491,7 +1491,8 @@
 
 (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 ()