aboutsummaryrefslogtreecommitdiffstats
path: root/lib/AdminPanel/rpmdragora.pm
diff options
context:
space:
mode:
Diffstat (limited to 'lib/AdminPanel/rpmdragora.pm')
-rw-r--r--lib/AdminPanel/rpmdragora.pm11
1 files changed, 4 insertions, 7 deletions
diff --git a/lib/AdminPanel/rpmdragora.pm b/lib/AdminPanel/rpmdragora.pm
index 4af30e5..59dd237 100644
--- a/lib/AdminPanel/rpmdragora.pm
+++ b/lib/AdminPanel/rpmdragora.pm
@@ -381,11 +381,7 @@ sub fatal_msg {
}
sub wait_msg {
- my ($msg, %options) = @_;
-
- if (ref \%options) {
- warnings::warn("AdminPanel::rpmdragora::wait_msg: options parameter is deprecated, and discarded");
- }
+ my $msg = shift;
my $label = $msg ? $msg : $loc->N("Please wait");
@@ -434,11 +430,12 @@ sub slow_func ($&) {
}
sub statusbar_msg {
+ my ($msg, $o_timeout) = @_;
+
unless ($::statusbar) { #- fallback if no status bar
- my $msg = shift;
return wait_msg($msg);
}
- my ($msg, $o_timeout) = @_;
+
$::statusbar->setLabel($msg);
#- always use the same context description for now
#my $cx = $::statusbar->get_context_id("foo");