diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2002-12-18 16:00:06 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2002-12-18 16:00:06 +0000 |
| commit | fc66dc19f747b66204279dd55f2c3e7f378b695f (patch) | |
| tree | 381f20fed155930d9c8f4aba105622a166692668 | |
| parent | cabec45b66bf300e72243d842d7c5267bdbf6b23 (diff) | |
| download | drakx-fc66dc19f747b66204279dd55f2c3e7f378b695f.tar drakx-fc66dc19f747b66204279dd55f2c3e7f378b695f.tar.gz drakx-fc66dc19f747b66204279dd55f2c3e7f378b695f.tar.bz2 drakx-fc66dc19f747b66204279dd55f2c3e7f378b695f.tar.xz drakx-fc66dc19f747b66204279dd55f2c3e7f378b695f.zip | |
new features including checking unused functions, and checking methods being available
| -rw-r--r-- | perl-install/.perl_checker | 8 | ||||
| -rw-r--r-- | perl-install/any.pm | 8 | ||||
| -rw-r--r-- | perl-install/install_any.pm | 2 |
3 files changed, 2 insertions, 16 deletions
diff --git a/perl-install/.perl_checker b/perl-install/.perl_checker index 9741bb58a..666ed5aa4 100644 --- a/perl-install/.perl_checker +++ b/perl-install/.perl_checker @@ -1,14 +1,6 @@ Gtk Gtk::Gdk::Pixbuf Gtk::Gdk::ImlibImage -Gtk2 -Gtk2::Pango -Gtk2::Pango::Pango urpm -CGI standalone -URPM -URPM::Package -URPM::DB -URPM::Resolve printer::hpoj diff --git a/perl-install/any.pm b/perl-install/any.pm index 2d4f7dad7..92bda10f8 100644 --- a/perl-install/any.pm +++ b/perl-install/any.pm @@ -596,14 +596,6 @@ sub miscellaneousNetwork { setExportedVarsInCsh("$::prefix/etc/profile.d/proxy.csh", $::o->{miscellaneous}, qw(http_proxy ftp_proxy)); } -sub load_category_no_message { - my ($category, $at_least_one) = @_; - my @l; - @l = modules::load_category($category, undef); - @l = modules::load_category($category, undef, 'force') if !@l && $at_least_one; - @l; -} - sub load_category { my ($in, $category, $auto, $at_least_one) = @_; diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 01f574460..da93883a2 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -1152,6 +1152,8 @@ use run_program; use common; use pkgs; +our @ISA = qw(); #- tell perl_checker this is a class + sub install_steps::do_pkgs { my ($o) = @_; bless { o => $o }, 'pkgs_interactive'; |