helpful

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

commit 2af13bea9e20df50b583684ac22f056e947e4829
parent 0d3e559d1d3eb2d35b64a29cbfeb4949efcaadca
Author: Wilfred Hughes <me@wilfred.me.uk>
Date:   Sun, 12 Aug 2018 17:41:16 -0700

Tweak comments for readability

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

diff --git a/helpful.el b/helpful.el @@ -1160,16 +1160,14 @@ buffer." ((and (not (symbolp sym)) (functionp sym)) (list nil nil nil)) ((and callable-p library-name) - ;; Convert foo.elc to foo.el. (-when-let (src-path (helpful--library-path library-name)) - ;; Open `src-path' ourselves, so we can widen before searching. - ;; ;; Opening large .c files can be slow (e.g. when looking at ;; `defalias'), especially if the user has configured mode hooks. ;; ;; Bind `auto-mode-alist' to nil, so we open the buffer in ;; `fundamental-mode' if it isn't already open. (let ((auto-mode-alist nil)) + ;; Open `src-path' ourselves, so we can widen before searching. (setq buf (find-file-noselect src-path))) (unless (-contains-p initial-buffers buf)