diff options
| author | Eli Zaretskii | 2025-01-24 10:40:14 +0200 |
|---|---|---|
| committer | Eli Zaretskii | 2025-01-24 10:40:14 +0200 |
| commit | 6c633ece6e6743d9724ff116322e573ddf79d79f (patch) | |
| tree | 9272cd1973d799c93515ba0db63f54cd1955b5dd | |
| parent | c941b94e51f4e5996718416ac908249cb71da1d9 (diff) | |
| download | emacs-6c633ece6e6743d9724ff116322e573ddf79d79f.tar.gz emacs-6c633ece6e6743d9724ff116322e573ddf79d79f.zip | |
Revert "; * src/dispnew.c (combine_updates_for_frame): Fix whitespace."
This reverts commit c941b94e51f4e5996718416ac908249cb71da1d9.
It was pushed by mistake.
| -rw-r--r-- | src/dispnew.c | 2 | ||||
| -rw-r--r-- | test/src/editfns-tests.el | 10 |
2 files changed, 1 insertions, 11 deletions
diff --git a/src/dispnew.c b/src/dispnew.c index 724ec6ece9a..e4567f6970c 100644 --- a/src/dispnew.c +++ b/src/dispnew.c | |||
| @@ -3967,7 +3967,7 @@ combine_updates_for_frame (struct frame *f, bool inhibit_scrolling) | |||
| 3967 | 3967 | ||
| 3968 | /* Determine visible frames on the root frame, including the root | 3968 | /* Determine visible frames on the root frame, including the root |
| 3969 | frame itself. Note that there are cases, see bug#75056, where we | 3969 | frame itself. Note that there are cases, see bug#75056, where we |
| 3970 | can be called for invisible frames. */ | 3970 | can be called for invisible frames. */ |
| 3971 | Lisp_Object z_order = frames_in_reverse_z_order (root, true); | 3971 | Lisp_Object z_order = frames_in_reverse_z_order (root, true); |
| 3972 | if (NILP (z_order)) | 3972 | if (NILP (z_order)) |
| 3973 | { | 3973 | { |
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 @@ | |||
| 534 | 'utf-8 nil (current-buffer)) | 534 | 'utf-8 nil (current-buffer)) |
| 535 | (should (null (sanity-check-change-functions-errors)))))) | 535 | (should (null (sanity-check-change-functions-errors)))))) |
| 536 | 536 | ||
| 537 | (ert-deftest editfns-tests-styled-print () | ||
| 538 | (let* ((print-unreadable-function | ||
| 539 | (lambda (&rest args) | ||
| 540 | (garbage-collect) | ||
| 541 | (make-string 100 ?Ā t))) | ||
| 542 | (str "\"[1] ĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀĀ\"")) | ||
| 543 | (should (string= | ||
| 544 | (format "%S" (format "%S %S" [1] (symbol-function '+))) str)))) | ||
| 545 | |||
| 546 | |||
| 547 | ;;; editfns-tests.el ends here | 537 | ;;; editfns-tests.el ends here |