diff options
author | Pascal Rigaux <pixel@mandriva.com> | 2001-07-24 22:45:01 +0000 |
---|---|---|
committer | Pascal Rigaux <pixel@mandriva.com> | 2001-07-24 22:45:01 +0000 |
commit | 391e4f3693e6bdaaf571cb4899c92331fba35015 (patch) | |
tree | 5bc182b0bdf3a6094f453e3cc905bdf8eae2f7f4 /perl-install | |
parent | b60c0cb8f67d745626fec6f0c8540818f24e91a6 (diff) | |
download | drakx-backup-do-not-use-391e4f3693e6bdaaf571cb4899c92331fba35015.tar drakx-backup-do-not-use-391e4f3693e6bdaaf571cb4899c92331fba35015.tar.gz drakx-backup-do-not-use-391e4f3693e6bdaaf571cb4899c92331fba35015.tar.bz2 drakx-backup-do-not-use-391e4f3693e6bdaaf571cb4899c92331fba35015.tar.xz drakx-backup-do-not-use-391e4f3693e6bdaaf571cb4899c92331fba35015.zip |
move to MDK::Common, bool->to_bool
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/Makefile | 2 | ||||
-rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/Makefile b/perl-install/Makefile index 84f41baa6..dd6b426b9 100644 --- a/perl-install/Makefile +++ b/perl-install/Makefile @@ -25,7 +25,7 @@ $(DIRS): $(MAKE) -C $@ test_pms: verify_c - for i in install2 standalone/keyboarddrake standalone/XFdrake standalone/drakboot; do perl_checker -I. -no_cw -excludec -excluderesize_fat::c_rewritten $$i; done + for i in install2 install_steps_*.pm standalone/keyboarddrake standalone/XFdrake standalone/drakboot; do perl_checker -I. -no_cw -excludec -excluderesize_fat::c_rewritten $$i; done for i in install2 install_steps_*.pm; do perl -cw -I. $$i; done verify_c: diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 8843f18b6..e0d90e7d9 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -473,7 +473,7 @@ sub installPackages { $w->sync; my $text = new Gtk::Label; my ($advertising, $change_time, $i); - my $show_advertising = bool(@install_any::advertising_images); + my $show_advertising = to_bool(@install_any::advertising_images); my ($msg, $msg_time_remaining, $msg_time_total) = map { new Gtk::Label($_) } '', (_("Estimating")) x 2; my ($progress, $progress_total) = map { new Gtk::ProgressBar } (1..2); $w->{rwindow}->set_policy(1, 1, 1); |