Skip to content

Commit 8143c4a

Browse files
dan suttonbbatsov
authored andcommitted
Restore missing parens
from conversion from when-let to when-let*
1 parent b34057a commit 8143c4a

File tree

2 files changed

+8
-8
lines changed

2 files changed

+8
-8
lines changed

cider-inspector.el

Lines changed: 7 additions & 7 deletions
Original file line numberDiff line numberDiff line change
@@ -143,29 +143,29 @@ current buffer's namespace."
143143
(interactive (list (cider-read-from-minibuffer "Inspect expression: " (cider-sexp-at-point))
144144
(cider-current-ns)))
145145
(when-let* ((value (cider-sync-request:inspect-expr expr ns (or cider-inspector-page-size 32)))
146-
(cider-inspector--render-value value)))
146+
(cider-inspector--render-value value))))
147147

148148
(defun cider-inspector-pop ()
149149
"Pop the last value off the inspector stack and render it.
150150
See `cider-sync-request:inspect-pop' and `cider-inspector--render-value'."
151151
(interactive)
152152
(setq cider-inspector-last-command 'cider-inspector-pop)
153153
(when-let* ((value (cider-sync-request:inspect-pop))
154-
(cider-inspector--render-value value)))
154+
(cider-inspector--render-value value))))
155155

156156
(defun cider-inspector-push (idx)
157157
"Inspect the value at IDX in the inspector stack and render it.
158158
See `cider-sync-request:insepect-push' and `cider-inspector--render-value'"
159159
(push (point) cider-inspector-location-stack)
160160
(when-let* ((value (cider-sync-request:inspect-push idx))
161-
(cider-inspector--render-value value)))
161+
(cider-inspector--render-value value))))
162162

163163
(defun cider-inspector-refresh ()
164164
"Re-render the currently inspected value.
165165
See `cider-sync-request:insepect-refresh' and `cider-inspector--render-value'"
166166
(interactive)
167167
(when-let* ((value (cider-sync-request:inspect-refresh))
168-
(cider-inspector--render-value value)))
168+
(cider-inspector--render-value value))))
169169

170170
(defun cider-inspector-next-page ()
171171
"Jump to the next page when inspecting a paginated sequence/map.
@@ -174,7 +174,7 @@ Does nothing if already on the last page."
174174
(interactive)
175175
(push (point) cider-inspector-page-location-stack)
176176
(when-let* ((value (cider-sync-request:inspect-next-page))
177-
(cider-inspector--render-value value)))
177+
(cider-inspector--render-value value))))
178178

179179
(defun cider-inspector-prev-page ()
180180
"Jump to the previous page when expecting a paginated sequence/map.
@@ -183,15 +183,15 @@ Does nothing if already on the first page."
183183
(interactive)
184184
(setq cider-inspector-last-command 'cider-inspector-prev-page)
185185
(when-let* ((value (cider-sync-request:inspect-prev-page))
186-
(cider-inspector--render-value value)))
186+
(cider-inspector--render-value value))))
187187

188188
(defun cider-inspector-set-page-size (page-size)
189189
"Set the page size in pagination mode to the specified PAGE-SIZE.
190190
191191
Current page will be reset to zero."
192192
(interactive "nPage size: ")
193193
(when-let* ((value (cider-sync-request:inspect-set-page-size page-size))
194-
(cider-inspector--render-value value)))
194+
(cider-inspector--render-value value))))
195195

196196
;; nREPL interactions
197197
(defun cider-sync-request:inspect-pop ()

cider-repl.el

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -903,7 +903,7 @@ text property `cider-old-input'."
903903
(interactive)
904904
(if-let* ((other-connection (cider-other-connection))
905905
(switch-to-buffer other-connection)
906-
(message "There's no other REPL for the current project")))
906+
(message "There's no other REPL for the current project"))))
907907

908908
(defvar cider-repl-clear-buffer-hook)
909909

0 commit comments

Comments
 (0)