File tree Expand file tree Collapse file tree 2 files changed +6
-4
lines changed Expand file tree Collapse file tree 2 files changed +6
-4
lines changed Original file line number Diff line number Diff line change @@ -53,6 +53,7 @@ and try to associate the created connection with this project automatically.
53
53
* [ #707 ] ( https://github.com/clojure-emacs/cider/issues/707 ) : Better support clojure.test/with-test.
54
54
* Fix namespace navigation in the namespace browser.
55
55
* [ #1565 ] ( https://github.com/clojure-emacs/cider/issues/1565 ) : Fix font-locking in apropos buffers.
56
+ * [ #1570 ] ( https://github.com/clojure-emacs/cider/issues/1570 ) : Handle properly rest params in eldoc.
56
57
57
58
## 0.10.2 / 2016-01-27
58
59
Original file line number Diff line number Diff line change 35
35
(require 'cider-compat )
36
36
(require 'cider-util )
37
37
38
- (require 'cl-lib )
38
+ (require 'seq )
39
39
40
40
(require 'eldoc )
41
41
@@ -60,11 +60,12 @@ POS is the index of the currently highlighted argument."
60
60
(mapconcat
61
61
(lambda (arg )
62
62
(let ((argstr (format " %s " arg)))
63
- (if (eq arg '& )
63
+ (if (string= arg " & " )
64
64
argstr
65
65
(prog1
66
66
(if (or (= (1+ i) pos)
67
- (and rest-pos (> (+ 1 i) rest-pos)
67
+ (and rest-pos
68
+ (> (+ 1 i) rest-pos)
68
69
(> pos rest-pos)))
69
70
(propertize argstr 'face
70
71
'eldoc-highlight-function-argument )
@@ -73,7 +74,7 @@ POS is the index of the currently highlighted argument."
73
74
74
75
(defun cider--find-rest-args-position (arglist )
75
76
" Find the position of & in the ARGLIST vector."
76
- (cl -position '& ( append arglist ()) ))
77
+ (seq -position arglist " & " ))
77
78
78
79
(defun cider-highlight-arglist (arglist pos )
79
80
" Format the ARGLIST for eldoc.
You can’t perform that action at this time.
0 commit comments