mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2024-12-02 02:03:07 +00:00
47 lines
1.2 KiB
Perl
47 lines
1.2 KiB
Perl
|
use base "installedtest";
|
||
|
|
use strict;
|
||
|
|
use testapi;
|
||
|
|
use utils;
|
||
|
|
use desktoptools;
|
||
|
|
|
||
|
|
# This script tests if Software shows some details on the application screen.
|
||
|
|
|
||
|
|
sub run {
|
||
|
|
my $self = shift;
|
||
|
|
|
||
|
|
# Sometimes, Software crashes after the VM has been rolled back.
|
||
|
|
# If so, restart the application.
|
||
|
|
unless (check_screen("apps_run_software")) {
|
||
|
|
restart_application("software");
|
||
|
|
}
|
||
|
|
|
||
|
|
# Search for the application and navigate to its screen.
|
||
|
|
assert_and_click("gnome_search_button");
|
||
|
|
wait_still_screen(2);
|
||
|
|
type_safely("mahjongg");
|
||
|
|
assert_and_click("software_mahjongg-found");
|
||
|
|
wait_still_screen(2);
|
||
|
|
assert_screen("software_mahjongg-install_pane");
|
||
|
|
|
||
|
|
# Check various info.
|
||
|
|
assert_and_click("software_mahjongg_name");
|
||
|
|
assert_screen("software_mahjongg_icon");
|
||
|
|
assert_screen("software_mahjongg_slide");
|
||
|
|
assert_screen("software_mahjongg_description");
|
||
|
|
|
||
|
|
# Hit several down arrows to reach more informations.
|
||
|
|
send_key_until_needlematch("software_mahjongg_place", "down");
|
||
|
|
# Check for application safety.
|
||
|
|
assert_and_click("software_mahjongg_safety");
|
||
|
|
}
|
||
|
|
|
||
|
|
sub test_flags {
|
||
|
|
# When finished, rollback to milestone.
|
||
|
|
return {always_rollback => 1};
|
||
|
|
}
|
||
|
|
|
||
|
|
1;
|
||
|
|
|
||
|
|
# vim: set sw=4 et:
|
||
|
|
|