mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2025-07-15 18:01:42 +00:00
We have enhanced the menu_launch_type to allow for start checking and maximizing applications. This PR uses the new functions wherever it seems logical. If special logic was used for certain cases, we have not touched these to preserve the exact behaviour. The crash workaround for the Fonts flatpak is dropped because it no longer seems to be needed with the latest version of the flatpak, and dropping it simplifies this migration. Fixes: https://pagure.io/fedora-qa/os-autoinst-distri-fedora/issue/358
54 lines
1.4 KiB
Perl
54 lines
1.4 KiB
Perl
use base "installedtest";
|
|
use strict;
|
|
use testapi;
|
|
use utils;
|
|
|
|
# This script will download the test files, start Nautilus,
|
|
# stretch it all over the screen and upload the status to
|
|
# set a milestone as a starting point for the other Nautilus tests.
|
|
|
|
sub run {
|
|
my $self = shift;
|
|
# Switch to console
|
|
$self->root_console(tty => 3);
|
|
# Perform git test
|
|
check_and_install_git();
|
|
# Download the test data
|
|
download_testdata();
|
|
|
|
assert_script_run("touch /home/test/Documents/.invisible.txt");
|
|
assert_script_run("chown test:test /home/test/Documents/.invisible.txt");
|
|
assert_script_run("rm -f /home/test/*reference*");
|
|
|
|
# Exit the terminal
|
|
desktop_vt;
|
|
|
|
# Set the update notification timestamp
|
|
set_update_notification_timestamp();
|
|
# Start the application
|
|
menu_launch_type("nautilus", checkstart => 1);
|
|
|
|
# Check that the icons are shown
|
|
assert_screen("nautilus_big_icon");
|
|
|
|
# Fullsize the Nautilus window.
|
|
wait_screen_change { send_key("super-up"); };
|
|
|
|
# Click to change the Directory view to listings.
|
|
assert_and_click("nautilus_toggle_view", timeout => '30', button => 'left', mousehide => '1');
|
|
|
|
# This will test the common directory structure. The structure is always created when a user is created, so let's see if it has been created correctly.
|
|
assert_screen("nautilus_available_directories");
|
|
}
|
|
|
|
sub test_flags {
|
|
return {fatal => 1, milestone => 1};
|
|
}
|
|
|
|
1;
|
|
|
|
# vim: set sw=4 et:
|
|
|
|
|
|
|