Fixed stupid errors and added regex sub fix for windows path seperator

diff --git a/META.yml b/META.yml
index 94ce854..d2176c7 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -1,6 +1,6 @@
 ---
 name: SDL_Perl
-version: v2.2.1.8
+version: v2.2.2
 author:
   - 'David J. Goehrig <DGOEHRIG@cpan.org>'
 abstract: Simple DirectMedia Layer for Perl
@@ -16,7 +16,7 @@ configure_requires:
 provides:
   SDL:
     file: lib/SDL.pm
-    version: v2.2.1.8
+    version: v2.2.2
   SDL::App:
     file: lib/SDL/App.pm
   SDL::Cdrom:

diff --git a/make/lib/SDL/Build.pm b/make/lib/SDL/Build.pm
index bcc03a5..fc37fe1 100644 (file)
--- a/make/lib/SDL/Build.pm
+++ b/make/lib/SDL/Build.pm
@@ -44,7 +44,7 @@ use Config;
 sub process_xs
 {
        my ($self, $file) = @_;
-
+               
        my $properties                   = $self->{properties};
        my $file_args                    = $self->notes( 'file_flags' )->{$file};
        my @old_values                   = @$properties{ keys %$file_args };
@@ -253,7 +253,7 @@ sub process_support_files {
 # get link flags with a given a sdl_dir
 sub alt_link_flags
 {
-       my($self) = @_;
+       my $self = shift;
        my $sdl_dir = shift;
 
        return '-L"'.$sdl_dir.'\lib"';
@@ -262,10 +262,10 @@ sub alt_link_flags
 # get compile flags with a given a sdl_dir
 sub alt_compile_flags
 {
-        my($self) = @_;
+        my $self = shift;
         my $sdl_dir = shift;
 
-        return '-L"'.$sdl_dir.'\include\SDL"'; 
+        return '-I"'.$sdl_dir.'\include\SDL"'; 
 }
 
 # Override to create a MacOS Bundle

diff --git a/make/lib/SDL/Build/MSWin32.pm b/make/lib/SDL/Build/MSWin32.pm
index 3951d4e..e1d006f 100644 (file)
--- a/make/lib/SDL/Build/MSWin32.pm
+++ b/make/lib/SDL/Build/MSWin32.pm
@@ -34,6 +34,13 @@ use Config;
 use Carp;
 use base 'SDL::Build';
 
+sub process_xs
+{
+       my ($self, $file) = @_;
+       $file =~ s/\\/\//g; #replace \ for / (Win32 needs this);
+       $self->SUPER::process_xs($file);
+}
+
 sub opengl_headers
 {
        return GL => 'SDL_opengl.h';