[svn:Module-Build] r10026 - Module-Build/trunk/lib/Module/Build

[kwilliams]

Author: kwilliams
Date: Sat Sep 29 21:15:40 2007
New Revision: 10026

Modified:
   Module-Build/trunk/lib/Module/Build/Base.pm

Log:
Use the is_windowsish() method

Modified: Module-Build/trunk/lib/Module/Build/Base.pm
==============================================================================
--- Module-Build/trunk/lib/Module/Build/Base.pm (original)
+++ Module-Build/trunk/lib/Module/Build/Base.pm Sat Sep 29 21:15:40 2007
@@ -1345,7 +1345,7 @@
   my $case_tolerant = 0+(File::Spec->can('case_tolerant')
                         && File::Spec->case_tolerant);
   $q{base_dir} = uc $q{base_dir} if $case_tolerant;
-  $q{base_dir} = Win32::GetShortPathName($q{base_dir}) if $^O eq 'MSWin32';
+  $q{base_dir} = Win32::GetShortPathName($q{base_dir}) if $self->is_windowsish;
 
   $q{magic_numfile} = $self->config_file('magicnum');