os-autoinst-distri-fedora/tests/apps_startstop/kde/aasetting.pm

60 lines
1.7 KiB
Perl
Raw Normal View History

use base "installedtest";
use strict;
use testapi;
use utils;
# This sets the KDE desktop background to plain black, to avoid
# needle match problems caused by transparency.
sub run {
my $self = shift;
# Run the Desktop settings
hold_key 'alt';
send_key 'd';
send_key 's';
release_key 'alt';
# Select type of background
assert_and_click "deskset_select_type";
wait_still_screen 2;
# Select plain color type
assert_and_click "deskset_plain_color";
wait_still_screen 2;
# Open colors selection
assert_and_click "deskset_select_color";
wait_still_screen 2;
# Select black
assert_and_click "deskset_select_black";
wait_still_screen 2;
# Confirm
assert_and_click "kde_ok";
wait_still_screen 2;
# Close the application
assert_and_click "kde_ok";
# If Updates Available notification(s) is/are shown, we want
# to get rid of that, because it can be later displayed
# over some applications preventing openQA to find
# correct buttons, which creates false positives. See
# https://bugzilla.redhat.com/show_bug.cgi?id=1730482 for
# KDE showing multiple notifications
my $count = 10;
while ($count > 0 && check_screen "desktop_update_notification_popup", 5) {
$count -= 1;
assert_and_click "desktop_update_notification_popup";
}
# also close akonadi_migration_agent notification if it shows up
# otherwise it makes wait_still_screen always time out
# https://bugzilla.redhat.com/show_bug.cgi?id=1716005
if (check_screen "akonadi_migration_agent", 10) {
assert_and_click "akonadi_migration_agent";
}
}
sub test_flags {
return {fatal => 1, milestone => 1};
}
1;
# vim: set sw=4 et: