mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2024-11-01 05:54:22 +00:00
b1dfcfdd3d
Contacts now has two burger menus, which is awkward. We need specific needles to identify each, we can't rely on the generic needle any more as it won't always open the right menu. We also need to still work with the old UI for the flatpak. Signed-off-by: Adam Williamson <awilliam@redhat.com>
67 lines
2.1 KiB
Perl
67 lines
2.1 KiB
Perl
use base "installedtest";
|
|
use strict;
|
|
use testapi;
|
|
use utils;
|
|
|
|
# This script will delete contacts.
|
|
|
|
sub remove_contact {
|
|
my $name = shift;
|
|
# The name identifiers are made as hashes of their values,
|
|
# let's hash the input to identify correct needles.
|
|
my $identity = hashed_string($name);
|
|
assert_and_click("contacts_contact_listed_$identity");
|
|
wait_still_screen(2);
|
|
# in older versions there's just a delete button on the right
|
|
# side of the screen, in newer versions there's a burger menu
|
|
# with a "Delete contact" entry, so we need to open the menu
|
|
# then click the entry. The other path is selecting multiple
|
|
# contacts; when we do that we get a red "Remove" button at
|
|
# bottom left
|
|
assert_and_click(["gnome_button_delete", "contacts_contact_remove", "contacts_right_menu"]);
|
|
assert_and_click("contacts_contact_delete") if (match_has_tag "contacts_right_menu");
|
|
wait_still_screen(2);
|
|
}
|
|
|
|
sub run {
|
|
my $self = shift;
|
|
# Wait to let everything settle.
|
|
sleep 5;
|
|
# One of the contact has always a grey background.
|
|
# Let's click on Charles Dickens to make sure that
|
|
# this one will be greyed out.
|
|
my $identity = hashed_string("Charles Dickens");
|
|
assert_and_click("contacts_contact_listed_$identity");
|
|
|
|
# Check that all contacts are in the addressbook.
|
|
assert_screen("contacts_contact_list_full");
|
|
|
|
# Remove one of the contacts.
|
|
remove_contact("John Keats");
|
|
# Now assert that the removal was successful by checking
|
|
# the list of contacts
|
|
assert_and_click("contacts_contact_listed_$identity");
|
|
assert_screen("contacts_contact_list_keatsless");
|
|
|
|
# Remove more contacts at once.
|
|
remove_contact("Walter Scott");
|
|
remove_contact("Emily Bronte");
|
|
remove_contact("Jane Austen");
|
|
|
|
# Assert that the contacts have been successfully removed.
|
|
assert_and_click("contacts_contact_listed_$identity");
|
|
assert_screen("contacts_contact_list_emptied");
|
|
}
|
|
|
|
sub test_flags {
|
|
# If this test fails, there is no need to continue.
|
|
return {always_rollback => 1};
|
|
}
|
|
|
|
1;
|
|
|
|
# vim: set sw=4 et:
|
|
|
|
|
|
|