summaryrefslogtreecommitdiffstats
path: root/perl-install/interactive
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mandriva.org>2008-09-12 14:48:28 +0000
committerThierry Vignaud <tv@mandriva.org>2008-09-12 14:48:28 +0000
commit1ae512dc2a879cc38e50c930e976bd4137653eaf (patch)
tree766e073874a9d296d272b552ff586d4aec313b61 /perl-install/interactive
parentac3064abe30d739f4b2f8e16193ab4732c339c31 (diff)
downloaddrakx-1ae512dc2a879cc38e50c930e976bd4137653eaf.tar
drakx-1ae512dc2a879cc38e50c930e976bd4137653eaf.tar.gz
drakx-1ae512dc2a879cc38e50c930e976bd4137653eaf.tar.bz2
drakx-1ae512dc2a879cc38e50c930e976bd4137653eaf.tar.xz
drakx-1ae512dc2a879cc38e50c930e976bd4137653eaf.zip
(wait_message_with_progress_bar) reuse mygtk2 (needed for next commit)
Diffstat (limited to 'perl-install/interactive')
-rw-r--r--perl-install/interactive/gtk.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/interactive/gtk.pm b/perl-install/interactive/gtk.pm
index f33295b72..ee10ba5ee 100644
--- a/perl-install/interactive/gtk.pm
+++ b/perl-install/interactive/gtk.pm
@@ -933,7 +933,7 @@ sub wait_message_endW {
sub wait_message_with_progress_bar {
my ($in, $o_title) = @_;
- my $progress = Gtk2::ProgressBar->new;
+ my $progress = gtknew('ProgressBar');
my $w = $in->wait_message($o_title, $progress);
my $displayed;
$progress->signal_connect(expose_event => sub { $displayed = 1; 0 });