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);
    # 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");
}


sub test_flags {
    return { always_rollback => 1 };
}

1;

# vim: set sw=4 et: