Permalink
Browse files

* helm-man.el (helm-c-man-default-action): Fix, use the car of candid…

…ates.
  • Loading branch information...
1 parent 1f842c5 commit a617ccf5c33d87706b9bca7262fd71ab85191037 @thierryvolpiatto thierryvolpiatto committed Mar 27, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 helm-man.el
View
@@ -30,7 +30,7 @@ source.")
(defun helm-c-man-default-action (candidate)
"Default action for jumping to a woman or man page from helm."
- (let ((wfiles (woman-file-name-all-completions candidate)))
+ (let ((wfiles (mapcar 'car (woman-file-name-all-completions candidate))))
(condition-case err
(if (> (length wfiles) 1)
(woman-find-file

0 comments on commit a617ccf

Please sign in to comment.