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