From 467298a34215401cdcbb1dded51bc2aba5f1f41c Mon Sep 17 00:00:00 2001 From: Lorry Tar Creator Date: Thu, 11 Jun 2015 22:32:06 +0000 Subject: Module-Build-0.4214 --- lib/Module/Build/Platform/cygwin.pm | 54 +++++++++++++++++++++++++++++++++++++ 1 file changed, 54 insertions(+) create mode 100644 lib/Module/Build/Platform/cygwin.pm (limited to 'lib/Module/Build/Platform/cygwin.pm') diff --git a/lib/Module/Build/Platform/cygwin.pm b/lib/Module/Build/Platform/cygwin.pm new file mode 100644 index 0000000..034b9e1 --- /dev/null +++ b/lib/Module/Build/Platform/cygwin.pm @@ -0,0 +1,54 @@ +package Module::Build::Platform::cygwin; + +use strict; +use warnings; +our $VERSION = '0.4214'; +$VERSION = eval $VERSION; +use Module::Build::Platform::Unix; + +our @ISA = qw(Module::Build::Platform::Unix); + +sub manpage_separator { + '.' +} + +# Copied from ExtUtils::MM_Cygwin::maybe_command() +# If our path begins with F then we use the Windows version +# to determine if it may be a command. Otherwise we use the tests +# from C. + +sub _maybe_command { + my ($self, $file) = @_; + + if ($file =~ m{^/cygdrive/}i) { + require Module::Build::Platform::Windows; + return Module::Build::Platform::Windows->_maybe_command($file); + } + + return $self->SUPER::_maybe_command($file); +} + +1; +__END__ + + +=head1 NAME + +Module::Build::Platform::cygwin - Builder class for Cygwin platform + +=head1 DESCRIPTION + +This module provides some routines very specific to the cygwin +platform. + +Please see the L for the general docs. + +=head1 AUTHOR + +Initial stub by Yitzchak Scott-Thoennes + +=head1 SEE ALSO + +perl(1), Module::Build(3), ExtUtils::MakeMaker(3) + +=cut -- cgit v1.2.1