diff options
Diffstat (limited to 'hmm.el')
-rw-r--r-- | hmm.el | 9 |
1 files changed, 7 insertions, 2 deletions
@@ -40,7 +40,9 @@ (defvar hmm-handlers '(:query ((:command locate) - (:command project-or-external-find-regexp)) + (:command project-or-external-find-regexp) + (:command woman) + (:command man)) :url ((:schemes ("mailto") :command browse-url-mail)) :file @@ -130,7 +132,10 @@ (append (list (format ,(format "%s-%%s" function-name) arg) (format ,(format "*%s-%%s*" function-name) arg)) - ,(cons 'list external-command)))) + ,(cons 'list external-command))) + ,(when (plist-get handler :display-buffer) + `(display-buffer + (format ,(format "*%s-%%s*" function-name) arg)))) (hmm-add-handler ',handler ,type)))) (defun hmm-add-handler (handler handling) |