From 899b71ccd53289caf7a3e3a9fe62c6c487aa293c Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Markus=20M=C3=BCtzel?= <markus.muetzel@gmx.de>
Date: Wed, 30 Aug 2023 19:12:53 +0200
Subject: [PATCH] print.m: Run new test only with graphics toolkit "qt" (bug
 #64510).

* scripts/plot/util/print.m: Run test involving printing an invisible figure
only with graphics toolkit "qt".
---
 scripts/plot/util/print.m | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/scripts/plot/util/print.m b/scripts/plot/util/print.m
index d09c9c3a0b..9846401ca9 100644
--- a/scripts/plot/util/print.m
+++ b/scripts/plot/util/print.m
@@ -828,7 +828,9 @@
 endfunction
 
 ## Print to file with and without file extension
-%!test
+%!testif ; (have_window_system () && any (strcmp ("qt", available_graphics_toolkits ())))
+%! toolkit = graphics_toolkit ();
+%! graphics_toolkit ("qt");
 %! hf = figure ("visible", "off");
 %! unwind_protect
 %!   x = 0:0.1:1;
@@ -843,6 +845,7 @@
 %!   unlink (tmp_name);
 %! unwind_protect_cleanup
 %!   close (hf);
+%!   graphics_toolkit (toolkit);
 %! end_unwind_protect
 
 %!error <a graphics handle>