This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e089269
)
lib.pm should not warn about loading .par files
author
Paul Fenwick
<pjf@perltraining.com.au>
Thu, 22 May 2008 23:24:34 +0000
(09:24 +1000)
committer
Rafael Garcia-Suarez
<rgarciasuarez@gmail.com>
Sun, 25 May 2008 21:14:40 +0000
(21:14 +0000)
Message-ID: <
48357412
.5020703@perltraining.com.au>
p4raw-id: //depot/perl@33927
lib/lib_pm.PL
patch
|
blob
|
blame
|
history
diff --git
a/lib/lib_pm.PL
b/lib/lib_pm.PL
index
2c12be4
..
bb2f7cc
100644
(file)
--- 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.5
565
';
+our $VERSION = '0.5
6
';
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");
}