diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2005-01-15 12:46:54 +0000 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2005-01-15 12:46:54 +0000 |
| commit | f79b331a48a9e8391e30d3cd624afc20f1b136b6 (patch) | |
| tree | 67699a642143d3743301986120169c2cf114149d /lisp | |
| parent | 8b3a75ac8f9fb619b3136a811b34e9d36ec4e2b8 (diff) | |
| download | emacs-f79b331a48a9e8391e30d3cd624afc20f1b136b6.tar.gz emacs-f79b331a48a9e8391e30d3cd624afc20f1b136b6.tar.bz2 emacs-f79b331a48a9e8391e30d3cd624afc20f1b136b6.zip | |
(woman-dired-define-key-maybe): If KEY is undefined,
lookup-key might return nil; handle that.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/woman.el | 3 |
2 files changed, 7 insertions, 1 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 567b5c5c9d5..9339bc1f87b 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2005-01-15 Stephen Eglen <S.J.Eglen@damtp.cam.ac.uk> (tiny change) + + * woman.el (woman-dired-define-key-maybe): If KEY is undefined, + lookup-key might return nil; handle that. + 2005-01-15 Alan Mackenzie <acm@muc.de> * ebrowse.el (ebrowse-class-in-tree): Return the tail of the tree 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 () |