Signed-off-by: Thomas Lamprecht <t.lamprecht@proxmox.com>
# GUI global variables
my ($window, $cmdbox, $inbox, $htmlview);
# GUI global variables
my ($window, $cmdbox, $inbox, $htmlview);
my ($next, $next_fctn, $target_hd);
my ($progress, $progress_status);
my ($next, $next_fctn, $target_hd);
my ($progress, $progress_status);
$fctn = $step_number if !$fctn;
$text = "_Previous" if !$text;
$fctn = $step_number if !$fctn;
$text = "_Previous" if !$text;
- $prev->set_label ($text);
+ $prev_btn->set_label ($text);
$step_number--;
$steps[$step_number]->{function}();
$step_number--;
$steps[$step_number]->{function}();
+ $prev_btn->grab_focus ();
$cmdbox->pack_end ($next, 0, 0, 10);
$cmdbox->pack_end ($next, 0, 0, 10);
- $prev = Gtk3::Button->new ('_Previous');
- $prev->signal_connect (clicked => sub { $last_display_change = 0; &prev_function (); });
- $cmdbox->pack_end ($prev, 0, 0, 10);
+ $prev_btn = Gtk3::Button->new ('_Previous');
+ $prev_btn->signal_connect (clicked => sub { $last_display_change = 0; &prev_function (); });
+ $cmdbox->pack_end ($prev_btn, 0, 0, 10);
my $abort = Gtk3::Button->new ('_Abort');
my $abort = Gtk3::Button->new ('_Abort');
- $prev->set_sensitive(1); # enable previous button at this point
+ $prev_btn->set_sensitive(1); # enable previous button at this point
- $prev->set_sensitive(0);
+ $prev_btn->set_sensitive(0);