Permalink
Browse files

Removed superfluous warning. Also brought in the capitalisation and s…

…lang police
  • Loading branch information...
1 parent 5f6446e commit 171a4d3045e0b1d69b23ea468bf873e9dc2f8efa @adamkennedy adamkennedy committed Jan 6, 2011
Showing with 11 additions and 10 deletions.
  1. +11 −10 Build.PL
View
21 Build.PL
@@ -17,7 +17,7 @@ This Release breaks back compatibility support with versions 2.4x and below
**************************************************************************
BROKENMSG
-### we need the platform-specific module
+### We need the platform-specific module
my %platforms = (
MSWin32 => 'Windows',
MacOS => 'Darwin',
@@ -34,10 +34,10 @@ my $package = 'My::Builder::' . ( $platforms{$^O} || 'Unix' );
print "Gonna use '$package' class ...\n";
eval "require $package" or Carp::confess "Require '$package' failed: $@\n";
-### subsystems to build
+### Subsystems to build
# <subsystem>
# <file> = hash of the following 2 values:
-# <from> = location of source file
+# <from> = location of source file
# <to> = location of build file to get name right
# <libraries> = list reqiured libraries, names the same as keys to hash %libraries
my %subsystems = (
@@ -452,7 +452,7 @@ my %subsystems = (
);
-### external libraries
+### External libraries
# <library name> = symbolic library name
# <define> = value that will be used as -D<value> option when compiling XS code
# <header> = header related to the library that will be used for avalability detection,
@@ -555,12 +555,13 @@ my %libraries = (
},
);
-### mangle the compilable files into a format Module::Build can understand
+### Mangle the compilable files into a format Module::Build can understand
my %xs =
map { $subsystems{$_}{file}{from} => $subsystems{$_}{file}{to} }
keys %subsystems;
-### stadard Module::Build stuff
+### Standard Module::Build stuff
+$My::Builder::config = $My::Builder::config; # Prevent a warning
my $build = $package->new(
module_name => 'SDL',
dist_name => 'SDL',
@@ -613,23 +614,23 @@ my $build = $package->new(
warn "###WARNING### Alien::SDL seems to be broken"
unless Alien::SDL->config('prefix');
-### see which subsystems can be built -- do we have headers for them?
+### See which subsystems can be built -- do we have headers for them?
print "Gonna autodetect available libraries ...\n";
my $build_systems = $build->find_subsystems( \%subsystems, \%libraries );
my $lib_translate = $build->translate_table( \%subsystems, \%libraries );
-### save info about available subsystems for future SDL::ConfigData
+### Save info about available subsystems for future SDL::ConfigData
print "Gonna write config_data ...\n";
$build->config_data( 'SDL_cfg', $build_systems );
$build->config_data( 'SDL_lib_translate', $lib_translate );
$build->config_data( 'subsystems', \%subsystems );
$build->config_data( 'libraries', \%libraries );
-### something that was originally special to MacOS/Darwin
+### Something that was originally special to MacOS/Darwin
# somebody MacOS/Darwin friendly should review whether it is still necessary
$build->special_build_settings();
-### get some info into M::B notes
+### Get some info into M::B notes
print "Gonna save some info to 'notes' ...\n";
$build->notes( 'subsystems', \%subsystems );
$build->notes( 'libraries', \%libraries );

0 comments on commit 171a4d3

Please sign in to comment.