From 23e3bcd9ffd7ee9174c94c76a361823f046144f8 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Bj=C3=B6rn=20Lindqvist?= Date: Wed, 14 Aug 2013 18:04:18 +0200 Subject: [PATCH] FUEL: Make fuel-help (C-c C-d d) work for vocabularies too. --- misc/fuel/fuel-help.el | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/misc/fuel/fuel-help.el b/misc/fuel/fuel-help.el index a5d0419b00..68f6db1ab3 100644 --- a/misc/fuel/fuel-help.el +++ b/misc/fuel/fuel-help.el @@ -254,10 +254,12 @@ (fuel-help--word-help t)) (defun fuel-help (&optional print-message) - "Show extended help about the symbol at point, using a help -buffer." + "Show extended help about the word or vocabulary at point, using a +help buffer." (interactive "p") - (fuel-help--word-help nil nil nil print-message)) + (if (factor-in-using) + (fuel-help-vocab (factor-symbol-at-point)) + (fuel-help--word-help nil nil nil print-message))) (defun fuel-help-vocab (vocab) "Ask for a vocabulary name and show its help page."