From b5b714420602230508f199cb392d21c4410a4f1d Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Thu, 4 Jul 2002 22:17:39 +0000 Subject: create symlink list_modules.pm in current directory for testing purpose --- perl-install/install2 | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'perl-install') diff --git a/perl-install/install2 b/perl-install/install2 index 8921e5db7..b26684f9f 100755 --- a/perl-install/install2 +++ b/perl-install/install2 @@ -21,6 +21,12 @@ use diagnostics; use strict; +BEGIN { + #- for testing purpose + (my $f = __FILE__) =~ s|install2$|list_modules.pm|; + -e $f or symlink '../kernel/list_modules.pm', $f; +} + use lib qw(/usr/bin/perl-install .); use install2; -- cgit v1.2.1