helpful

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

commit 69474e9c49076ce82cea4eff237933b6cec0b5cf
parent 802bc8b7836c3c99f591dda1d56cf6d4016812bd
Author: Nick Drozd <nicholasdrozd@gmail.com>
Date:   Thu, 11 Jul 2019 18:19:29 -0500

Fix helpful--convert-c-name calls

I don't know how these got mixed up, but they did.

Diffstat:
Mhelpful.el | 4++--
Mtest/helpful-unit-test.el | 4++++
2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/helpful.el b/helpful.el @@ -2558,8 +2558,8 @@ nil if SYMBOL doesn't begin with \"F\" or \"V\"." See also `helpful-callable' and `helpful-variable'." (interactive (list (helpful--read-symbol "Symbol: " #'helpful--bound-p))) - (let ((c-var-sym (helpful--convert-c-name symbol nil)) - (c-fn-sym (helpful--convert-c-name symbol t))) + (let ((c-var-sym (helpful--convert-c-name symbol t)) + (c-fn-sym (helpful--convert-c-name symbol nil))) (cond ((and (boundp symbol) (fboundp symbol)) (if (y-or-n-p diff --git a/test/helpful-unit-test.el b/test/helpful-unit-test.el @@ -933,6 +933,10 @@ find the source code." (should-not (helpful--convert-c-name 'Vgc_cons_percentage nil))) +(ert-deftest helpful-symbol-c-style () + (helpful-symbol 'Fget_char_property) + (helpful-symbol 'Vinhibit_field_text_motion)) + (ert-deftest helpful-symbol-unbound () "Ensure we inform the user if we're given an unbound symbol." (should