Mercurial > emacs
changeset 84881:b0d17e361aac
(woman-dired-define-keys): Use `mapc' rather than `mapcar'.
| author | Juanma Barranquero <lekktu@gmail.com> |
|---|---|
| date | Tue, 25 Sep 2007 11:16:03 +0000 |
| parents | edcc591dc3a4 |
| children | 53e9aeda2b18 |
| files | lisp/woman.el |
| diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/woman.el Tue Sep 25 11:15:17 2007 +0000 +++ b/lisp/woman.el Tue Sep 25 11:16:03 2007 +0000 @@ -595,7 +595,7 @@ MANPATH_MAP[ \t]+\\(\\S-+\\)[ \t]+\\(\\S-+\\)\\)" nil t) (add-to-list 'manpath (if (match-beginning 1) - (match-string 1) + (match-string 1) (cons (match-string 2) (match-string 3))))) manpath)) @@ -1525,7 +1525,7 @@ "Define dired keys to run WoMan according to `woman-dired-keys'." (if woman-dired-keys (if (listp woman-dired-keys) - (mapcar 'woman-dired-define-key woman-dired-keys) + (mapc 'woman-dired-define-key woman-dired-keys) (woman-dired-define-key-maybe "w") (woman-dired-define-key-maybe "W"))) (define-key-after (lookup-key dired-mode-map [menu-bar immediate])