showterm.el: revert #3338

This commit is contained in:
drzv
2026-05-26 01:55:01 +00:00
parent 43b6afcdf3
commit 875ae5a773

View File

@@ -76,18 +76,16 @@
(setq str (buffer-string)) (setq str (buffer-string))
(erase-buffer)) (erase-buffer))
(let ((proc (let (process-connection-type) (let ((proc (let (process-connection-type)
(make-process :name "convert" (start-process "convert" (current-buffer)
:buffer (current-buffer) "convert"
:stderr " convert-stderr" "png:-"
:command `("convert" "-gravity" "center"
"png:-" "-background" "white"
"-gravity" "center" "-scale" (format "%dx%d"
"-background" "white" showterm-pixel-width
"-scale" ,(format "%dx%d" showterm-pixel-width)
showterm-pixel-width "-extent" (format "%dx" showterm-pixel-width)
showterm-pixel-width) "png:-"))))
"-extent" ,(format "%dx" showterm-pixel-width)
"png:-")))))
(process-send-string proc str) (process-send-string proc str)
(process-send-eof proc) (process-send-eof proc)
(showterm-wait-for-process proc)) (showterm-wait-for-process proc))