Save more progress.

This commit is contained in:
Lukáš Růžička 2024-04-03 14:07:13 +02:00
parent 59aac13d73
commit 7c7d9d5990
5 changed files with 16 additions and 48 deletions

View File

@ -9,16 +9,16 @@ sub run {
my $self = shift;
# Check that the picture name is shown
assert_screen "loupe_picture_name";
assert_screen "gwen_picture_name";
# Check that the Side panel is visible, try to make it visible if it is not.
if (!check_screen("loupe_side_panel")) {
send_key("f9");
if (!check_screen("gwen_side_panel")) {
send_key("f4");
}
assert_screen("loupe_side_panel");
assert_screen("gwen_side_panel");
# Check that info on side panel is correct
assert_screen("loupe_img_info");
assert_screen("gwen_img_info");
}
sub test_flags {

View File

@ -12,10 +12,14 @@ sub run {
wait_still_screen 3;
# Go to next picture.
send_key("right");
assert_screen("loupe_image_next", timeout => 90);
assert_screen("gwen_image_next", timeout => 90);
# Go to previous picture
send_key("left");
assert_and_click("loupe_image_default", timeout => 90);
assert_and_click("gwen_image_default", timeout => 90);
# Show the browse menu
assert_and_click("gwen_show_browse");
# Check it
assert_screen("gwen_browse_shown");
}
sub test_flags {

View File

@ -9,14 +9,14 @@ sub run {
my $self = shift;
# Toggle full screen
send_key("f11");
send_key("ctrl-shift-f");
wait_still_screen 2;
assert_screen("loupe_fullscreen_on");
assert_screen("gwen_fullscreen_on");
# Return to normal mode
send_key("f11");
send_key("ctrl-shift-f");
wait_still_screen 2;
assert_screen("loupe_image_default");
assert_screen("gwen_image_default");
}
sub test_flags {

View File

@ -11,10 +11,7 @@ sub run {
# Open the shortcuts
send_key("f1");
assert_screen("loupe_help_shown", timeout => 120);
# Try another screen
assert_and_click("loupe_help_image_view", timeout => 60);
assert_screen("loupe_help_view_shown");
assert_screen("gwen_help_shown", timeout => 120);
}
sub test_flags {

View File

@ -1,33 +0,0 @@
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");
wait_still_screen(2);
# Confirm
assert_and_click("loupe_set_wallpaper");
wait_still_screen(2);
# 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: