From 0aa7a9e98c3b51085c87aa13d61eef8e3f694626 Mon Sep 17 00:00:00 2001 From: pad Date: Tue, 14 Sep 1999 14:50:50 +0000 Subject: *** empty log message *** --- perl-install/install_any.pm | 7 ++++++- 1 file changed, 6 insertions(+), 1 deletion(-) (limited to 'perl-install/install_any.pm') diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index f9b604bc6..79c41bfa6 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -10,14 +10,19 @@ use vars qw(@ISA %EXPORT_TAGS @EXPORT_OK); ); @EXPORT_OK = map { @$_ } values %EXPORT_TAGS; +#-###################################################################################### +#- misc imports +#-###################################################################################### use common qw(:common :system); use run_program; use detect_devices; use pkgs; use log; -1; +#-###################################################################################### +#- Functions +#-###################################################################################### sub relGetFile($) { local $_ = member($_[0], qw(compss compssList depslist hdlist)) ? "base" : "RPMS"; $_ = "Mandrake/$_/$_[0]"; -- cgit v1.2.1