summaryrefslogtreecommitdiffstats
path: root/perl-install/ugtk3.pm
diff options
context:
space:
mode:
authorThierry Vignaud <thierry.vignaud@gmail.com>2013-11-17 12:30:08 +0100
committerThierry Vignaud <thierry.vignaud@gmail.com>2013-11-24 23:30:18 +0100
commit3cfaca7fb9efac159556e25a53940dcd341b5dad (patch)
treef9dd6b3f8793623ed8eecb8500b5dd67c0e9c1b9 /perl-install/ugtk3.pm
parentad02d01dbed0bc2717eb1bf057455e95255d2d32 (diff)
downloaddrakx-3cfaca7fb9efac159556e25a53940dcd341b5dad.tar
drakx-3cfaca7fb9efac159556e25a53940dcd341b5dad.tar.gz
drakx-3cfaca7fb9efac159556e25a53940dcd341b5dad.tar.bz2
drakx-3cfaca7fb9efac159556e25a53940dcd341b5dad.tar.xz
drakx-3cfaca7fb9efac159556e25a53940dcd341b5dad.zip
update API for installer
Diffstat (limited to 'perl-install/ugtk3.pm')
-rw-r--r--perl-install/ugtk3.pm5
1 files changed, 3 insertions, 2 deletions
diff --git a/perl-install/ugtk3.pm b/perl-install/ugtk3.pm
index 24df06e95..a262d1b6e 100644
--- a/perl-install/ugtk3.pm
+++ b/perl-install/ugtk3.pm
@@ -1440,8 +1440,9 @@ sub set_style {
# used by install::steps_gtk::installPackages()
sub update_text {
- my ($banner) = @_;
- $banner->queue_draw;
+ my ($banner, $new_text) = @_;
+ $banner->{label}->set_text($new_text);
+ $banner->{label}->queue_draw;
}
sub new {