File tree Expand file tree Collapse file tree 1 file changed +5
-8
lines changed Expand file tree Collapse file tree 1 file changed +5
-8
lines changed Original file line number Diff line number Diff line change @@ -1302,14 +1302,11 @@ When invoked with a prefix ARG the command doesn't prompt for confirmation."
1302
1302
(let ((current-ns (cider-current-ns))
1303
1303
(start-line (line-number-at-pos start-pos))
1304
1304
(start-column (save-excursion (goto-char start-pos) (current-column ))))
1305
- (with-temp-buffer
1306
- (insert (format " (ns %s ) " current-ns))
1307
- (dotimes (_ (1- start-line))
1308
- (insert " \n " ))
1309
- (dotimes (_ start-column)
1310
- (insert " " ))
1311
- (insert form)
1312
- (buffer-string ))))
1305
+ (concat
1306
+ (format " (ns %s ) " current-ns)
1307
+ (make-string (1- start-line) ?\n )
1308
+ (make-string start-column ? )
1309
+ form)))
1313
1310
1314
1311
(defun cider-interactive-eval (form &optional start-pos )
1315
1312
" Evaluate the given FORM and print value in minibuffer."
You can’t perform that action at this time.
0 commit comments