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
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Bump up version numbers.
[perl5.git]
/
lib
/
ExtUtils
/
Manifest.pm
diff --git
a/lib/ExtUtils/Manifest.pm
b/lib/ExtUtils/Manifest.pm
index
244214a
..
4656ead
100644
(file)
--- a/
lib/ExtUtils/Manifest.pm
+++ b/
lib/ExtUtils/Manifest.pm
@@
-12,7
+12,7
@@
our ($VERSION,@ISA,@EXPORT_OK,
$Is_MacOS,$Is_VMS,
$Debug,$Verbose,$Quiet,$MANIFEST,$found,$DEFAULT_MSKIP);
$Is_MacOS,$Is_VMS,
$Debug,$Verbose,$Quiet,$MANIFEST,$found,$DEFAULT_MSKIP);
-$VERSION = substr(q$Revision: 1.3
3
$, 10);
+$VERSION = substr(q$Revision: 1.3
5
$, 10);
@ISA=('Exporter');
@EXPORT_OK = ('mkmanifest', 'manicheck', 'fullcheck', 'filecheck',
'skipcheck', 'maniread', 'manicopy');
@ISA=('Exporter');
@EXPORT_OK = ('mkmanifest', 'manicheck', 'fullcheck', 'filecheck',
'skipcheck', 'maniread', 'manicopy');
@@
-35,7
+35,7
@@
unless (defined $Config{d_link}) {
sub mkmanifest {
my $manimiss = 0;
sub mkmanifest {
my $manimiss = 0;
- my $read =
maniread(
) or $manimiss++;
+ my $read =
(-r 'MANIFEST' && maniread()
) or $manimiss++;
$read = {} if $manimiss;
local *M;
rename $MANIFEST, "$MANIFEST.bak" unless $manimiss;
$read = {} if $manimiss;
local *M;
rename $MANIFEST, "$MANIFEST.bak" unless $manimiss;
@@
-121,7
+121,7
@@
sub _manicheck {
}
warn "Debug: manicheck checking from disk $file\n" if $Debug;
unless ( exists $read->{$file} ) {
}
warn "Debug: manicheck checking from disk $file\n" if $Debug;
unless ( exists $read->{$file} ) {
- my $canon =
"\t" . _unmacify($file) if $Is_MacOS
;
+ my $canon =
$Is_MacOS ? "\t" . _unmacify($file) : ''
;
warn "Not in $MANIFEST: $file$canon\n" unless $Quiet;
push @missentry, $file;
}
warn "Not in $MANIFEST: $file$canon\n" unless $Quiet;
push @missentry, $file;
}