diff options
| -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'; |