mirror of
https://github.com/rocky-linux/os-autoinst-distri-rocky.git
synced 2024-12-27 04:50:55 +00:00
ede7713a6c
this stuff is only appropriate when a switched keyboard layout is in play. Left unconditional like this, it breaks the normal encrypted install test case.
45 lines
1.2 KiB
Perl
45 lines
1.2 KiB
Perl
use base "anacondatest";
|
|
use strict;
|
|
use testapi;
|
|
|
|
sub run {
|
|
my $self = shift;
|
|
# Anaconda hub
|
|
# Go to INSTALLATION DESTINATION and ensure one disk is selected.
|
|
$self->select_disks();
|
|
|
|
# check "encrypt data" checkbox
|
|
assert_and_click "anaconda_install_destination_encrypt_data";
|
|
assert_and_click "anaconda_spoke_done";
|
|
|
|
# type password for disk encryption
|
|
wait_idle 5;
|
|
if (get_var("SWITCHED_LAYOUT")) {
|
|
$self->switch_layout("us");
|
|
}
|
|
type_string get_var("ENCRYPT_PASSWORD");
|
|
send_key "tab";
|
|
type_string get_var("ENCRYPT_PASSWORD");
|
|
if (get_var("SWITCHED_LAYOUT")) {
|
|
# work around RHBZ #1333984
|
|
$self->switch_layout("native");
|
|
}
|
|
|
|
assert_and_click "anaconda_install_destination_save_passphrase";
|
|
|
|
# Anaconda hub
|
|
assert_screen "anaconda_main_hub", 300; #
|
|
|
|
}
|
|
|
|
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:
|