os-autoinst-distri-rocky-mi.../tests/upgrade_postinstall_desktop.pm
Adam Williamson 2f1216c3b0 use lowercase $VERSION for upgrade version check
Summary:
For Rawhide, the text in os-release-fedora is 'rawhide' not
'Rawhide', so lc the $VERSION value when checking. For other
releases it's digits, so the lc won't change anything - lc('23')
is '23'.

Test Plan: Run the Rawhide upgrade tests, they should succeed.

Reviewers: jskladan, garretraziel

Reviewed By: garretraziel

Subscribers: tflink

Differential Revision: https://phab.qadevel.cloud.fedoraproject.org/D620
2015-10-16 23:38:09 -07:00

36 lines
941 B
Perl

use base "installedtest";
use strict;
use testapi;
sub run {
my $self = shift;
my $password = get_var("USER_PASSWORD", "weakpassword");
# wait for GDM to appear
$self->boot_to_login_screen("graphical_login", 20);
# login as normal user
send_key "ret";
assert_screen "graphical_login_input";
type_string $password;
send_key "ret";
# wait until desktop appears
assert_screen "graphical_desktop_clean", 30;
# check an upgrade actually happened (and we can log into a console)
$self->root_console(tty=>3);
$self->check_release(lc(get_var('VERSION')));
}
sub test_flags {
# without anything - rollback to 'lastgood' snapshot if failed
# 'fatal' - whole test suite is in danger if this fails
# 'milestone' - after this test succeeds, update 'lastgood'
# 'important' - if this fails, set the overall state to 'fail'
return { fatal => 1 };
}
1;
# vim: set sw=4 et: