Skip to content

Commit e7d51f1

Browse files
committed
Remove redundant string argument from cider-repl--display-image
1 parent f4b14cb commit e7d51f1

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

cider-repl.el

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -788,7 +788,7 @@ the symbol."
788788
t)))
789789
(t t))))
790790

791-
(defun cider-repl--display-image (buffer image &optional show-prefix bol string)
791+
(defun cider-repl--display-image (buffer image &optional show-prefix bol)
792792
"Insert IMAGE into BUFFER at the current point.
793793
794794
For compatibility with the rest of CIDER's REPL machinery, supports
@@ -809,7 +809,7 @@ SHOW-PREFIX and BOL."
809809
(props (nconc `(display ,image rear-nonsticky (display))
810810
(when (boundp 'image-map)
811811
`(keymap ,image-map)))))
812-
(insert-before-markers string)
812+
(insert-before-markers " ")
813813
(add-text-properties start (point) props)))))
814814
(cider-repl--show-maximum-output))
815815
t)
@@ -836,14 +836,14 @@ raw image data or a filename. Returns an image instance with a margin per
836836
Part of the default `cider-repl-content-type-handler-alist'."
837837
(cider-repl--display-image buffer
838838
(cider-repl--image image 'jpeg t)
839-
show-prefix bol " "))
839+
show-prefix bol))
840840

841841
(defun cider-repl-handle-png (_type buffer image &optional show-prefix bol)
842842
"A handler for inserting a png IMAGE into a repl BUFFER.
843843
Part of the default `cider-repl-content-type-handler-alist'."
844844
(cider-repl--display-image buffer
845845
(cider-repl--image image 'png t)
846-
show-prefix bol " "))
846+
show-prefix bol))
847847

848848
(defun cider-repl-handle-external-body (type buffer _ &optional _show-prefix _bol)
849849
"Handler for slurping external content into BUFFER.

0 commit comments

Comments
 (0)