1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-12 09:54:21 +00:00
os-autoinst-distri-fedora/tests/applications/nautilus/star_file.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

45 lines
1.1 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
# Star a file and check it is displayed in the Starred folder.
sub run {
my $self = shift;
# Enter the Documents directory to get to the test data.
assert_and_click("nautilus_directory_documents");
# Right click onto a file to select it to see the
# context menu.
assert_and_click("nautilus_test_file", button => "right");
wait_still_screen(2);
# Click to Star it.
assert_and_click("nautilus_context_star");
# Check that a star gets solid on the right part of the selected file
assert_screen("nautilus_star_confirm");
# Click on Starred to see all the starred files in a new view.
assert_and_click("nautilus_directory_starred");
wait_still_screen(2);
# Check that the view switched to Starred
assert_screen("nautilus_starred_selected");
# Check that the file has appeared.
assert_screen("nautilus_test_file");
}
sub test_flags {
# Rollback to the previous state to make space for other parts.
return {always_rollback => 1};
}
1;