This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Upgrade ExtUtils::CBuilder from version 0.280223 to 0.280224
[perl5.git] / dist / ExtUtils-CBuilder / lib / ExtUtils / CBuilder.pm
index 9e60d08..abe976e 100644 (file)
@@ -1,10 +1,12 @@
 package ExtUtils::CBuilder;
-$ExtUtils::CBuilder::VERSION = '0.280223';
+$ExtUtils::CBuilder::VERSION = '0.280224';
 use File::Spec ();
 use File::Path ();
 use File::Basename ();
 use Perl::OSType qw/os_type/;
 
+use warnings;
+use strict;
 use vars qw(@ISA);
 
 # We only use this once - don't waste a symbol table entry on it.
@@ -18,17 +20,18 @@ my $load = sub {
 
 {
   my @package = split /::/, __PACKAGE__;
-  
+
   my $ostype = os_type();
 
   if (grep {-e File::Spec->catfile($_, @package, 'Platform', $^O) . '.pm'} @INC) {
-    $load->(__PACKAGE__ . "::Platform::$^O");
-    
-  } elsif ( $ostype && grep {-e File::Spec->catfile($_, @package, 'Platform', $ostype) . '.pm'} @INC) {
-    $load->(__PACKAGE__ . "::Platform::$ostype");
-    
+      $load->(__PACKAGE__ . "::Platform::$^O");
+
+  } elsif ( $ostype &&
+            grep {-e File::Spec->catfile($_, @package, 'Platform', $ostype) . '.pm'} @INC) {
+      $load->(__PACKAGE__ . "::Platform::$ostype");
+
   } else {
-    $load->(__PACKAGE__ . "::Base");
+      $load->(__PACKAGE__ . "::Base");
   }
 }