Fix side-effect in 'eat--set-term-sixel-params'
* eat.el (eat--set-term-sixel-params): Fix unintended side-effect.
This commit is contained in:
parent
c071e9e5e3
commit
9d0f612004
1 changed files with 3 additions and 4 deletions
7
eat.el
7
eat.el
|
@ -5087,10 +5087,9 @@ selection, or nil if none."
|
|||
(_ (cons (default-font-width) (default-font-height)))))
|
||||
(scale-x (* eat-sixel-aspect-ratio eat-sixel-scale))
|
||||
(scale-y eat-sixel-scale))
|
||||
(setf (car dimensions) (max 1 (round (/ (car dimensions)
|
||||
(float scale-x)))))
|
||||
(setf (cdr dimensions) (max 1 (round (/ (cdr dimensions)
|
||||
(float scale-y)))))
|
||||
(setq dimensions
|
||||
(cons (max 1 (round (/ (car dimensions) (float scale-x))))
|
||||
(max 1 (round (/ (cdr dimensions) (float scale-y))))))
|
||||
(setf (eat-term-parameter eat-terminal 'sixel-render-format)
|
||||
render-fmt)
|
||||
(setf (eat-term-parameter eat-terminal 'char-dimensions)
|
||||
|
|
Loading…
Add table
Reference in a new issue