helpful

a fork of Wilfred's helpful
git clone https://git.trogloxene.org/helpful.git
Log | Files | Refs | README

commit c13a6b4b5b97bc342ae6c90c1d530d92bea66e05
parent fdeb8da145e5e353800db652aae4cc74e300f5f0
Author: Nick Drozd <nicholasdrozd@gmail.com>
Date:   Mon, 25 Dec 2017 09:46:28 -0800

Use sym-type in advice string

Diffstat:
Mhelpful.el | 3+--
1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/helpful.el b/helpful.el @@ -1120,8 +1120,7 @@ state of the current symbol." (helpful--insert-section-break) (insert (helpful--heading "Advice") - (format - "This %s is advised." (if (macrop helpful--sym) "macro" "function")))) + (format "This %s is advised." (downcase sym-type)))) (let ((can-edebug (helpful--can-edebug-p helpful--sym helpful--callable-p))