[gnome-build-meta/sam/openqa-fixes: 4/5] openqa: Fix Perl-ism

[Marge Bot <marge-bot src gnome org>]

commit f1de2b5b0585b1ddf4e932f30680283a77e10adc
Author: Sam Thursfield <sam thursfield codethink co uk>
Date:   Wed Sep 7 13:25:18 2022 +0200

    openqa: Fix Perl-ism
    
    One cannot use `true` to mean "true", but `1` is OK.
    
    Avoids the following error:
    
        Unquoted string "true" may clash with future reserved word at /tests/lib/gnomeutils.pm line 14.
    
    Part-of: <https://gitlab.gnome.org/GNOME/gnome-build-meta/-/merge_requests/1754>

 openqa/lib/gnomeutils.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)
---
diff --git a/openqa/lib/gnomeutils.pm b/openqa/lib/gnomeutils.pm
index 75fd7b2ef..0eb396c22 100644
--- a/openqa/lib/gnomeutils.pm
+++ b/openqa/lib/gnomeutils.pm
@@ -11,7 +11,7 @@ sub run_command {
     send_key('esc');
     wait_still_screen(2);
 
-    send_key($desktop_runner_hotkey, wait_screen_change => true);
+    send_key($desktop_runner_hotkey, wait_screen_change => 1);
 
     assert_screen('desktop_runner', $desktop_runner_timeout);