@@ -143,29 +143,29 @@ current buffer's namespace."
143
143
(interactive (list (cider-read-from-minibuffer " Inspect expression: " (cider-sexp-at-point))
144
144
(cider-current-ns)))
145
145
(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))))
147
147
148
148
(defun cider-inspector-pop ()
149
149
" Pop the last value off the inspector stack and render it.
150
150
See `cider-sync-request:inspect-pop' and `cider-inspector--render-value' ."
151
151
(interactive )
152
152
(setq cider-inspector-last-command 'cider-inspector-pop )
153
153
(when-let* ((value (cider-sync-request:inspect-pop))
154
- (cider-inspector--render-value value)))
154
+ (cider-inspector--render-value value))))
155
155
156
156
(defun cider-inspector-push (idx )
157
157
" Inspect the value at IDX in the inspector stack and render it.
158
158
See `cider-sync-request:insepect-push' and `cider-inspector--render-value' "
159
159
(push (point ) cider-inspector-location-stack)
160
160
(when-let* ((value (cider-sync-request:inspect-push idx))
161
- (cider-inspector--render-value value)))
161
+ (cider-inspector--render-value value))))
162
162
163
163
(defun cider-inspector-refresh ()
164
164
" Re-render the currently inspected value.
165
165
See `cider-sync-request:insepect-refresh' and `cider-inspector--render-value' "
166
166
(interactive )
167
167
(when-let* ((value (cider-sync-request:inspect-refresh))
168
- (cider-inspector--render-value value)))
168
+ (cider-inspector--render-value value))))
169
169
170
170
(defun cider-inspector-next-page ()
171
171
" Jump to the next page when inspecting a paginated sequence/map.
@@ -174,7 +174,7 @@ Does nothing if already on the last page."
174
174
(interactive )
175
175
(push (point ) cider-inspector-page-location-stack)
176
176
(when-let* ((value (cider-sync-request:inspect-next-page))
177
- (cider-inspector--render-value value)))
177
+ (cider-inspector--render-value value))))
178
178
179
179
(defun cider-inspector-prev-page ()
180
180
" Jump to the previous page when expecting a paginated sequence/map.
@@ -183,15 +183,15 @@ Does nothing if already on the first page."
183
183
(interactive )
184
184
(setq cider-inspector-last-command 'cider-inspector-prev-page )
185
185
(when-let* ((value (cider-sync-request:inspect-prev-page))
186
- (cider-inspector--render-value value)))
186
+ (cider-inspector--render-value value))))
187
187
188
188
(defun cider-inspector-set-page-size (page-size )
189
189
" Set the page size in pagination mode to the specified PAGE-SIZE.
190
190
191
191
Current page will be reset to zero."
192
192
(interactive " nPage size: " )
193
193
(when-let* ((value (cider-sync-request:inspect-set-page-size page-size))
194
- (cider-inspector--render-value value)))
194
+ (cider-inspector--render-value value))))
195
195
196
196
; ; nREPL interactions
197
197
(defun cider-sync-request:inspect-pop ()
0 commit comments