From 1e2cebd45e8b3f50ae72044113aef0a128cb4b59 Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Wed, 22 Jan 2003 10:16:56 +0000 Subject: fix progressbar label initialization --- perl-install/standalone/drakfont | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'perl-install/standalone') diff --git a/perl-install/standalone/drakfont b/perl-install/standalone/drakfont index aefdfc10b..297048d02 100755 --- a/perl-install/standalone/drakfont +++ b/perl-install/standalone/drakfont @@ -1138,18 +1138,18 @@ sub import_status { { col_spacings => 10, row_spacings => 50 }, [ "", "" ], [ - N("Initial tests"), $pbar, $pbar->{label} = new Gtk2::Label(' ') + N("Initial tests"), $pbar, $pbar->set_text(' ') ], [ N("Copy fonts on your system"), $pbar1, - $pbar1->{label} = new Gtk2::Label(' ') + $pbar1->set_text(' ') ], [ N("Install & convert Fonts"), $pbar2, - $pbar2->{label} = new Gtk2::Label(' ') + $pbar2->set_text(' ') ], [ - N("Post Install"), $pbar3, $pbar3->{label} = new Gtk2::Label(' ') + N("Post Install"), $pbar3, $pbar3->set_text(' ') ], ), ); @@ -1171,15 +1171,15 @@ sub import_status_uninstall { [ "", "" ], [ "", "" ], [ - N("Initial tests"), $pbar, $pbar->{label} = new Gtk2::Label(' ') + N("Initial tests"), $pbar, $pbar->set_text(' ') ], [ N("Remove fonts on your system"), $pbar1, - $pbar1->{label} = new Gtk2::Label(' ') + $pbar1->set_text(' ') ], [ N("Post Uninstall"), $pbar2, - $pbar2->{label} = new Gtk2::Label(' ') + $pbar2->set_text(' ') ], ), ); -- cgit v1.2.1