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/applications/gnome-panel/volumebar.pm

53 lines
1.3 KiB
Perl

use base "installedtest";
use strict;
use testapi;
use utils;
# This part of the suite tests if the volume levels
# are reflected in the volume bar in the control menu.
#
sub check_volume {
my $level = shift;
# Check that the volume indicator changes
assert_screen("panel_volume_indicator_$level");
# Open the control menu and check the volume bar
# shows the status of the volume level.
assert_and_click("panel_controls");
assert_screen("panel_volume_bar_$level");
# Close the control window
send_key("esc");
wait_still_screen(2, similarity_level => 38);
}
sub run {
my $self = shift;
# Open the terminal to enable us to set the
# volume level.
menu_launch_type("terminal");
assert_screen("apps_run_terminal");
# Set the volume to 0%
type_safely('amixer -D pipewire sset Master 0%');
send_key('ret');
# Check that it worked
check_volume("zero");
# Set the volume to 50%
type_safely('amixer -D pipewire sset Master 50%');
send_key('ret');
# Check that it worked
check_volume("fifty");
# Set the volume to 100%
type_safely('amixer -D pipewire sset Master 100%');
send_key('ret');
# Check that it worked
check_volume("hundred");
}
sub test_flags {
return {always_rollback => 1};
}
1;
# vim: set sw=4 et: