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
Update Module-Build to CPAN version 0.4200
[perl5.git]
/
cpan
/
Module-Build
/
lib
/
Module
/
Build
/
Platform
/
cygwin.pm
diff --git
a/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm
b/cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm
index
c176c39
..
6584c84
100644
(file)
--- a/
cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm
+++ b/
cpan/Module-Build/lib/Module/Build/Platform/cygwin.pm
@@
-2,7
+2,7
@@
package Module::Build::Platform::cygwin;
use strict;
use vars qw($VERSION);
use strict;
use vars qw($VERSION);
-$VERSION = '0.
35_09
';
+$VERSION = '0.
4200
';
$VERSION = eval $VERSION;
use Module::Build::Platform::Unix;
$VERSION = eval $VERSION;
use Module::Build::Platform::Unix;
@@
-14,7
+14,7
@@
sub manpage_separator {
}
# Copied from ExtUtils::MM_Cygwin::maybe_command()
}
# Copied from ExtUtils::MM_Cygwin::maybe_command()
-# If our path begins with F</cygdrive/> then we use
C<ExtUtils::MM_Win32>
+# If our path begins with F</cygdrive/> then we use
the Windows version
# to determine if it may be a command. Otherwise we use the tests
# from C<ExtUtils::MM_Unix>.
# to determine if it may be a command. Otherwise we use the tests
# from C<ExtUtils::MM_Unix>.
@@
-22,8
+22,8
@@
sub _maybe_command {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i) {
my ($self, $file) = @_;
if ($file =~ m{^/cygdrive/}i) {
- require Module::Build::Platform::Win
32
;
- return Module::Build::Platform::Win
32
->_maybe_command($file);
+ require Module::Build::Platform::Win
dows
;
+ return Module::Build::Platform::Win
dows
->_maybe_command($file);
}
return $self->SUPER::_maybe_command($file);
}
return $self->SUPER::_maybe_command($file);