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) /* 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