summaryrefslogtreecommitdiff
path: root/cider-doc.el
diff options
context:
space:
mode:
authorArtur Malabarba <bruce.connor.am@gmail.com>2015-10-21 23:36:07 +0100
committerArtur Malabarba <bruce.connor.am@gmail.com>2015-10-21 23:36:07 +0100
commit4210c4d076f4b91585b5621d2b64097ae2483c55 (patch)
tree9f6cfc3566e07845795cc60d75e5f7b9bc9c44e7 /cider-doc.el
parent33263a858cd4aa228f990cfc82e64a9a7a3b3c0a (diff)
Normalize the usage of if/when-let with that of let
Diffstat (limited to 'cider-doc.el')
-rw-r--r--cider-doc.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/cider-doc.el b/cider-doc.el
index 8669ccd7..dc6e44e8 100644
--- a/cider-doc.el
+++ b/cider-doc.el
@@ -204,8 +204,8 @@ opposite of what that option dictates."
"Open the source for the current symbol, if available."
(interactive)
(if cider-docview-file
- (if-let (buffer (and (not (cider--tooling-file-p cider-docview-file))
- (cider-find-file cider-docview-file)))
+ (if-let ((buffer (and (not (cider--tooling-file-p cider-docview-file))
+ (cider-find-file cider-docview-file))))
(cider-jump-to buffer (if cider-docview-line
(cons cider-docview-line nil)
cider-docview-symbol)
@@ -238,12 +238,12 @@ opposite of what that option dictates."
(defun cider-create-doc-buffer (symbol)
"Populates *cider-doc* with the documentation for SYMBOL."
- (when-let (info (cider-var-info symbol))
+ (when-let ((info (cider-var-info symbol)))
(cider-docview-render (cider-make-popup-buffer cider-doc-buffer) symbol info)))
(defun cider-doc-lookup (symbol)
"Look up documentation for SYMBOL."
- (if-let (buffer (cider-create-doc-buffer symbol))
+ (if-let ((buffer (cider-create-doc-buffer symbol)))
(cider-popup-buffer-display buffer t)
(user-error "Symbol %s not resolved" symbol)))