From 9d0f6120041b151f692a20af8e3fd1ae7a374c64 Mon Sep 17 00:00:00 2001 From: Akib Azmain Turja Date: Tue, 10 Oct 2023 00:42:51 +0600 Subject: [PATCH] Fix side-effect in 'eat--set-term-sixel-params' * eat.el (eat--set-term-sixel-params): Fix unintended side-effect. --- eat.el | 7 +++---- 1 file changed, 3 insertions(+), 4 deletions(-) diff --git a/eat.el b/eat.el index 10ffbc6..b44619c 100644 --- a/eat.el +++ b/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)