From: Paul Fenwick <pjf@perltraining.com.au>
Date: Thu, 22 May 2008 23:24:34 +0000 (+1000)
Subject: lib.pm should not warn about loading .par files
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=4f923b567478eff0dc7a4bc348785f02b03ea502;p=p5sagit%2Fp5-mst-13.2.git

lib.pm should not warn about loading .par files
Message-ID: <48357412.5020703@perltraining.com.au>

p4raw-id: //depot/perl@33927
---

diff --git a/lib/lib_pm.PL b/lib/lib_pm.PL
index 2c12be4..bb2f7cc 100644
--- a/lib/lib_pm.PL
+++ b/lib/lib_pm.PL
@@ -58,7 +58,7 @@ my \@inc_version_list = $Config_inc_version_list;
 print OUT <<'!NO!SUBS!';
 
 our @ORIG_INC = @INC;	# take a handy copy of 'original' value
-our $VERSION = '0.5565';
+our $VERSION = '0.56';
 my $Is_MacOS = $^O eq 'MacOS';
 my $Mac_FS;
 if ($Is_MacOS) {
@@ -79,7 +79,7 @@ sub import {
 
 	$path = _nativize($path);
 
-	if (-e $path && ! -d _) {
+	if ($path !~ /\.par$/i && -e $path && ! -d _) {
 	    require Carp;
 	    Carp::carp("Parameter to use lib must be directory, not file");
 	}