From a7d01167d130264985b441ac77de575951e2319f Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 24 Jan 2025 10:40:14 +0200 Subject: [PATCH] Revert "; * src/dispnew.c (combine_updates_for_frame): Fix whitespace." This reverts commit c941b94e51f4e5996718416ac908249cb71da1d9. It was pushed by mistake. (cherry picked from commit 6c633ece6e6743d9724ff116322e573ddf79d79f) --- src/dispnew.c | 2 +- test/src/editfns-tests.el | 10 ---------- 2 files changed, 1 insertion(+), 11 deletions(-) diff --git a/src/dispnew.c b/src/dispnew.c index 39a2fd659f9..fe82bcfd822 100644 --- a/src/dispnew.c +++ b/src/dispnew.c @@ -3964,7 +3964,7 @@ combine_updates_for_frame (struct frame *f, bool inhibit_scrolling) /* Determine visible frames on the root frame, including the root frame itself. Note that there are cases, see bug#75056, where we - can be called for invisible frames. */ + can be called for invisible frames. */ Lisp_Object z_order = frames_in_reverse_z_order (root, true); if (NILP (z_order)) { diff --git a/test/src/editfns-tests.el b/test/src/editfns-tests.el index 6da3c73f001..9fff4255b57 100644 --- a/test/src/editfns-tests.el +++ b/test/src/editfns-tests.el @@ -534,14 +534,4 @@ 'utf-8 nil (current-buffer)) (should (null (sanity-check-change-functions-errors)))))) -(ert-deftest editfns-tests-styled-print () - (let* ((print-unreadable-function - (lambda (&rest args) - (garbage-collect) - (make-string 100 ?Ā t))) - (str "\"[1] ĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀ\"")) - (should (string= - (format "%S" (format "%S %S" [1] (symbol-function '+))) str)))) - - ;;; editfns-tests.el ends here -- 2.39.5