mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2024-12-23 02:33:08 +00:00
9e0d74453c
This PR adds a test for a new Image Viewer called Loupe. It is based on the old Image Viewer test, newly reneedled with some of the tests shortened, deleted or edited as the new Image Viewer has a little bit less functions compared to the previous one. Add needles.
32 lines
574 B
Perl
32 lines
574 B
Perl
use base "installedtest";
|
|
use strict;
|
|
use testapi;
|
|
use utils;
|
|
|
|
# This part tests if the application can put an image as a wallpaper.
|
|
|
|
sub run {
|
|
my $self = shift;
|
|
sleep 2;
|
|
|
|
# Go to the menu
|
|
send_key("f10");
|
|
# Set as background
|
|
assert_and_click("loupe_menu_set_wallpaper");
|
|
# Confirm
|
|
assert_and_click("loupe_set_wallpaper");
|
|
# Close the application
|
|
send_key("alt-f4");
|
|
# Check that the wallpaper was set
|
|
assert_screen("loupe_image_background");
|
|
|
|
}
|
|
|
|
sub test_flags {
|
|
return {always_rollback => 1};
|
|
}
|
|
|
|
1;
|
|
|
|
# vim: set sw=4 et:
|