summaryrefslogtreecommitdiff
path: root/cider-browse-ns.el
diff options
context:
space:
mode:
Diffstat (limited to 'cider-browse-ns.el')
-rw-r--r--cider-browse-ns.el10
1 files changed, 5 insertions, 5 deletions
diff --git a/cider-browse-ns.el b/cider-browse-ns.el
index b142ecfe..f44216fa 100644
--- a/cider-browse-ns.el
+++ b/cider-browse-ns.el
@@ -174,11 +174,11 @@ Each item consists of a ns-var and the first line of its docstring."
Return a list of the type ('ns or 'var) and the value."
(let ((line (car (split-string (string-trim (thing-at-point 'line)) " "))))
(if (string-match "\\." line)
- (list 'ns line)
- (list 'var (format "%s/%s"
- (or (get-text-property (point) 'cider-browse-ns-current-ns)
- cider-browse-ns-current-ns)
- line)))))
+ `(ns ,line)
+ `(var ,(format "%s/%s"
+ (or (get-text-property (point) 'cider-browse-ns-current-ns)
+ cider-browse-ns-current-ns)
+ line)))))
(defun cider-browse-ns-doc-at-point ()
"Show the documentation for the thing at current point."