From a83e60eccbc16613fc3da85f46a3fb032c098a82 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Sun, 14 Jan 2024 14:10:17 +0100 Subject: [PATCH] Fix recent ses-tests mistakes (bug#5852) * test/lisp/ses-tests.el (ses-set-formula-write-cells-with-changed-references): Quote constant list. Remove unused variable. --- test/lisp/ses-tests.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/lisp/ses-tests.el b/test/lisp/ses-tests.el index be6784be7a0..a916aed9eb3 100644 --- a/test/lisp/ses-tests.el +++ b/test/lisp/ses-tests.el @@ -246,7 +246,7 @@ to `ses--bar' and inserting a row, makes A2 value empty, and `ses--bar' equal to When setting a formula has some cell with changed references, this cell has to be rewritten to data area." (let ((ses-initial-size '(4 . 3)) - ses-after-entry-functions beg) + (ses-after-entry-functions nil)) (with-temp-buffer (ses-mode) (dolist (c '((0 1 1); B1 @@ -257,7 +257,7 @@ cell has to be rewritten to data area." (apply 'ses-calculate-cell (list (car c) (cadr c) nil))) (ses-cell-set-formula 2 1 '(+ B2 A3)); B3 (ses-command-hook) - (ses-cell-set-formula 3 1 (+ B3 A4)); B4 + (ses-cell-set-formula 3 1 '(+ B3 A4)); B4 (ses-command-hook) (should (equal (ses-cell-references 1 1) '(B3))) (ses-mode) -- 2.39.2