commit fef7699b1efdab13800e90b4c4124400daee01a0 parent 5e59ccefb75d440c540036ce72c1da5f93a9d5f6 Author: Wilfred Hughes <me@wilfred.me.uk> Date: Thu, 2 Aug 2018 21:44:01 -0700 Use normal let where we don't have destructuring Diffstat:
| M | helpful.el | | | 24 | ++++++++++++------------ |
1 file changed, 12 insertions(+), 12 deletions(-)
diff --git a/helpful.el b/helpful.el @@ -1130,18 +1130,18 @@ the buffer when done. POS is the position of the start of the definition within the buffer." - (-let ((initial-buffers (buffer-list)) - (primitive-p (helpful--primitive-p sym callable-p)) - (path nil) - (buf nil) - (pos nil) - (opened nil) - ;; Skip running find-file-hook since it may prompt the user. - (find-file-hook nil) - ;; If we end up opening a buffer, don't bother with file - ;; variables. It prompts the user, and we discard the buffer - ;; afterwards anyway. - (enable-local-variables nil)) + (let ((initial-buffers (buffer-list)) + (primitive-p (helpful--primitive-p sym callable-p)) + (path nil) + (buf nil) + (pos nil) + (opened nil) + ;; Skip running find-file-hook since it may prompt the user. + (find-file-hook nil) + ;; If we end up opening a buffer, don't bother with file + ;; variables. It prompts the user, and we discard the buffer + ;; afterwards anyway. + (enable-local-variables nil)) ;; We shouldn't be called on primitive functions if we don't have ;; a directory of Emacs C sourcecode. (cl-assert