1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-22 14:03:09 +00:00
os-autoinst-distri-fedora/tests/applications/gnome-text-editor/skins.pm
Adam Williamson 1a65993d36 Add a perltidy check and apply it to the entire codebase
Signed-off-by: Adam Williamson <awilliam@redhat.com>
2022-07-28 14:38:38 -07:00

75 lines
1.8 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
# This part tests that different color varieties can be used.
sub run {
my $self = shift;
# Check that dark style can be used.
assert_and_click("gnome_burger_menu");
assert_and_click("gte_change_to_dark");
wait_still_screen(2);
send_key("esc");
assert_screen("gte_dark_style_used");
# Check that color varieties can be used.
# We will only test several of the varieties
assert_and_click("gnome_burger_menu");
assert_and_click("gte_preferences_submenu");
wait_still_screen(2);
if (get_var("CANNED")) {
# This is for the older version of g-t-e in Silverblue
# Click on Adwaita;
assert_and_click("gte_select_adwaita");
assert_screen("gte_adwaita_used");
# Switch to dark Adwaita
send_key("tab");
sleep 1;
send_key("ret");
assert_screen("gte_darkadwaita_used");
# Switch to Classic
send_key("tab");
sleep 1;
send_key("ret");
assert_screen("gte_classic_used");
# Switch to DarkClassic
send_key("tab");
sleep 1;
send_key("ret");
assert_screen("gte_darkclassic_used");
# Switch to Cobalt
send_key("tab");
sleep 1;
send_key("ret");
assert_screen("gte_cobalt_used");
}
else {
# This is for newer version in F36+ RPMs)
# Use A3 pattern
assert_and_click("gte-a3-select");
assert_screen("gte-a3-selected");
# Use B2 pattern
assert_and_click("gte-b2-select");
assert_screen("gte-b2-selected");
# Use A3 pattern
assert_and_click("gte-b4-select");
assert_screen("gte-b4-selected");
}
}
sub test_flags {
return {always_rollback => 1};
}
1;
# vim: set sw=4 et: