Skip to content

Commit 93651b7

Browse files
committed
New option cider-use-tooltips
1 parent 4d1c32e commit 93651b7

File tree

2 files changed

+9
-1
lines changed

2 files changed

+9
-1
lines changed

CHANGELOG.md

Lines changed: 1 addition & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -4,6 +4,7 @@
44

55
### New Features
66

7+
* Option `cider-use-tooltips` controls the display of mouse-over tooltips.
78
* `f` key reruns failed tests on the test-report buffer.
89
* `g` key reruns test at point on the test-report buffer.
910
* Debugger now supports step-in.

cider-mode.el

Lines changed: 8 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -651,11 +651,18 @@ before point."
651651
"[`']" "\\\\=\\&"
652652
(buffer-substring-no-properties (point-min) (1- (point))))))
653653

654+
(defcustom cider-use-tooltips t
655+
"If non-nil, CIDER displays mouse-over tooltips."
656+
:group 'cider
657+
:type 'boolean
658+
:package-version '(cider "0.12.0"))
659+
654660
(defun cider--help-echo (_ obj pos)
655661
"Return the help-echo string for OBJ at POS.
656662
See \(info \"(elisp) Special Properties\")"
657663
(while-no-input
658-
(when (and (bufferp obj) (cider-connected-p))
664+
(when (and (bufferp obj) (cider-connected-p)
665+
cider-use-tooltips)
659666
(with-current-buffer obj
660667
(ignore-errors
661668
(save-excursion

0 commit comments

Comments
 (0)