1
0
mirror of https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git synced 2024-11-14 02:34:21 +00:00
os-autoinst-distri-fedora/tests/apps_startstop/gnome/scan.pm

34 lines
671 B
Perl
Raw Normal View History

use base "installedtest";
use strict;
use testapi;
use utils;
# This test checks that Simple Scan starts.
sub run {
my $self = shift;
2024-06-12 12:35:00 +00:00
my $subvariant = get_var("SUBVARIANT", "Workstation");
2024-06-12 12:35:00 +00:00
if ($subvariant ne "Silverblue") {
# Start the application
start_with_launcher('apps_menu_scan');
# Check that is started
assert_screen 'apps_run_scan';
# Register application
register_application("simple-scan");
# Close the application
quit_with_shortcut();
}
else {
diag("Scan is not installed, skipping the test.");
}
}
sub test_flags {
return {};
}
1;
# vim: set sw=4 et: