From: Kartik Thakore Date: Tue, 1 Sep 2009 02:23:48 +0000 (-0400) Subject: what ? X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e90b353e68f2648e0e26a970d4d89724ccc63868;p=sdlgit%2FSDL_perl.git what ? --- diff --git a/exp/SDL/Rect/lib/SDL/Rect.pm b/exp/SDL/Rect/lib/SDL/Rect.pm index c0c02e5..c17ba67 100644 --- a/exp/SDL/Rect/lib/SDL/Rect.pm +++ b/exp/SDL/Rect/lib/SDL/Rect.pm @@ -7,7 +7,7 @@ use strict; require Exporter; require DynaLoader; @ISA = qw(Exporter DynaLoader); - @EXPORT = qw( NewRect RectX RectY RectW RectH); + @EXPORT = qw(NewRect RectX RectY RectW RectH); diff --git a/exp/SDL/Rect/t/001_load.t b/exp/SDL/Rect/t/001_load.t index 6be37ec..97398c0 100644 --- a/exp/SDL/Rect/t/001_load.t +++ b/exp/SDL/Rect/t/001_load.t @@ -6,7 +6,7 @@ use Test::More tests => 2; BEGIN { use_ok( 'SDL::Rect' ); } -my $object = SDL::Rect->NewRect(0,0,0,0); +my $object = SDL::Rect::NewRect(0,0,0,0); isa_ok ($object, 'SDL::Rect');