mirror of
https://pagure.io/fedora-qa/os-autoinst-distri-fedora.git
synced 2024-12-11 05:43:11 +00:00
55 lines
1.5 KiB
Perl
55 lines
1.5 KiB
Perl
|
use base "installedtest";
|
||
|
|
use strict;
|
||
|
|
use testapi;
|
||
|
|
use utils;
|
||
|
|
use desktoptools;
|
||
|
|
|
||
|
|
# This script tests if Software can install applications from RPMs, verify
|
||
|
|
# the installation and open the application directly from Software.
|
||
|
|
|
||
|
|
# We copied the subroutine from the install_multi_rpms.pm and adapted it
|
||
|
|
# to only install one single application.
|
||
|
|
# We have decided to duplicate that code here and not place in the library,
|
||
|
|
# as we will probably not use it anywhere else than this Software test.
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
sub run {
|
||
|
|
my $self = shift;
|
||
|
|
|
||
|
|
unless (get_var("SUBVARIANT") eq "Silverblue") {
|
||
|
|
# Sometimes, after rollback, Software crashes. If it
|
||
|
|
# happens, let's restart it.
|
||
|
|
unless (check_screen("apps_run_software")) {
|
||
|
|
restart_application("software");
|
||
|
|
}
|
||
|
|
|
||
|
|
# Install the application.
|
||
|
|
install_application("mahjongg", "rpm");
|
||
|
|
wait_still_screen(10);
|
||
|
|
# Check that it is installed.
|
||
|
|
check_app_installed("mahjongg");
|
||
|
|
# Start it from Software.
|
||
|
|
start_application_via_packagemanager("mahjongg");
|
||
|
|
|
||
|
|
# Confirm that it has been installed using CLI tools.
|
||
|
|
# Switch to console
|
||
|
|
$self->root_console(tty => 3);
|
||
|
|
# Check that the rpm is installed.
|
||
|
|
assert_script_run("rpm -qa gnome-mahjongg");
|
||
|
|
}
|
||
|
|
else {
|
||
|
|
record_info("Silverblue override", "This test has been skipped because the functionality is not available on Silverblue.");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
sub test_flags {
|
||
|
|
# When finished, rollback to milestone
|
||
|
|
return {always_rollback => 1};
|
||
|
|
}
|
||
|
|
|
||
|
|
1;
|
||
|
|
|
||
|
|
# vim: set sw=4 et:
|
||
|
|
|