Skip to content

Commit 3e7bc1d

Browse files
committed
Fix the rendering of the xref buffer
A misplaced closing paren was messing up all the actions in the buffer.
1 parent 906171b commit 3e7bc1d

File tree

1 file changed

+21
-21
lines changed

1 file changed

+21
-21
lines changed

cider-xref.el

Lines changed: 21 additions & 21 deletions
Original file line numberDiff line numberDiff line change
@@ -65,27 +65,27 @@ the symbol found by the xref search as argument."
6565
(cider-propertize-region (list 'apropos-symbol var-name
6666
'action 'cider-xref-doc
6767
'help-echo "Display doc")
68-
(insert-text-button var-name 'type 'apropos-symbol)
69-
(insert "\n ")
70-
(insert-text-button "Function" 'type 'apropos-function)
71-
(insert ": ")
72-
(let ((beg (point)))
73-
(insert (nrepl-dict-get result "doc"))
74-
(fill-region beg (point)))
75-
(insert "\n")
76-
(if-let* ((file (nrepl-dict-get result "file"))
77-
(line (nrepl-dict-get result "line")))
78-
(progn
79-
(insert (propertize var-name
80-
'font-lock-face 'font-lock-function-name-face)
81-
" is defined in ")
82-
(insert-text-button (cider--abbreviate-file-protocol file)
83-
'follow-link t
84-
'action (lambda (_x)
85-
(cider-xref-source file line var-name)))
86-
(insert "."))
87-
(insert "Definition location unavailable."))
88-
(insert "\n"))))
68+
(insert-text-button var-name 'type 'apropos-symbol))
69+
(insert "\n ")
70+
(insert-text-button "Function" 'type 'apropos-function)
71+
(insert ": ")
72+
(let ((beg (point)))
73+
(insert (nrepl-dict-get result "doc"))
74+
(fill-region beg (point)))
75+
(insert "\n")
76+
(if-let* ((file (nrepl-dict-get result "file"))
77+
(line (nrepl-dict-get result "line")))
78+
(progn
79+
(insert (propertize var-name
80+
'font-lock-face 'font-lock-function-name-face)
81+
" is defined in ")
82+
(insert-text-button (cider--abbreviate-file-protocol file)
83+
'follow-link t
84+
'action (lambda (_x)
85+
(cider-xref-source file line var-name)))
86+
(insert "."))
87+
(insert "Definition location unavailable."))
88+
(insert "\n")))
8989

9090
(defun cider-xref-source (file line name)
9191
"Find source for FILE, LINE and NAME."

0 commit comments

Comments
 (0)