helpful

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

commit 9f00889a742c55097b77e11ce27f86d27d44f9af
parent eb380bfc90108005439671629c7d9297b7d13fc1
Author: Wilfred Hughes <me@wilfred.me.uk>
Date:   Mon, 18 Dec 2017 22:52:00 +0000

Show symbol properties last, as they're the least useful

Diffstat:
Mhelpful.el | 11++++++-----
1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/helpful.el b/helpful.el @@ -962,11 +962,6 @@ state of the current symbol." 'symbol helpful--sym 'callable-p helpful--callable-p)) - (-when-let (formatted-props (helpful--format-properties helpful--sym)) - (insert - (helpful--heading "\n\nSymbol Properties\n") - formatted-props)) - (when (helpful--advised-p helpful--sym) (insert (helpful--heading "\n\nAdvice\n") @@ -1075,6 +1070,12 @@ state of the current symbol." (t (helpful--syntax-highlight (helpful--pretty-print source)))))) + + (-when-let (formatted-props (helpful--format-properties helpful--sym)) + (insert + (helpful--heading "\nSymbol Properties\n") + formatted-props)) + (goto-char (point-min)) (forward-line (1- start-line)) (forward-char start-column)))