From ad435273700f250cd55ca3c020435458caba5876 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 9 Aug 2001 12:00:15 +0000 Subject: rename interactive_pkgs in pkgs_interactive --- perl-install/install_any.pm | 4 ++-- perl-install/standalone.pm | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 870d91643..ed68a29f3 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -961,14 +961,14 @@ sub remove_bigseldom_used { ################################################################################ -package interactive_pkgs; +package pkgs_interactive; use run_program; use common; use pkgs; sub install_steps::do_pkgs { my ($o) = @_; - bless { o => $o }, 'interactive_pkgs'; + bless { o => $o }, 'pkgs_interactive'; } sub install { diff --git a/perl-install/standalone.pm b/perl-install/standalone.pm index 60f21b729..09d49e5b6 100644 --- a/perl-install/standalone.pm +++ b/perl-install/standalone.pm @@ -12,11 +12,11 @@ c::bindtextdomain('libDrakX', "/usr/share/locale"); ################################################################################ -package interactive_pkgs; +package pkgs_interactive; sub interactive::do_pkgs { my ($in) = @_; - bless { in => $in }, 'interactive_pkgs'; + bless { in => $in }, 'pkgs_interactive'; } sub install { -- cgit v1.2.1