develooper Front page | perl.perl5.porters | Postings from October 2008

installperl patchlet

Thread Next
From:
andreas.koenig.7os6VVqR
Date:
October 27, 2008 21:11
Subject:
installperl patchlet
Message ID:
87k5btpdef.fsf@k75.linux.bogus
Without this patch you can get 

  Use of uninitialized value in numeric eq (==) at ./install_lib.pl line 122.

when a directoy in the path does no exist.

--- installperl-0	2008-10-28 05:05:30.000000000 +0100
+++ installperl	2008-10-28 05:05:33.000000000 +0100
@@ -612,6 +612,7 @@
 	next unless m,^/,;
 	# Use &samepath here because some systems have other dirs linked
 	# to $mainperldir (like SunOS)
+	next unless -d;
 	next if samepath($_, $binexp);
 	next if samepath($_, cwd());
 	next if ($mainperl_is_instperl && samepath($_, $mainperldir));



-- 
andreas

Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About