[Catalyst-commits] r7115 - in trunk/Catalyst-Engine-Wx: . lib/Catalyst/Log t/lib/TestAppWx

[eriam at dev.catalyst.perl.org]

Author: eriam
Date: 2007-11-09 18:07:34 +0000 (Fri, 09 Nov 2007)
New Revision: 7115

Modified:
   trunk/Catalyst-Engine-Wx/Makefile.PL
   trunk/Catalyst-Engine-Wx/lib/Catalyst/Log/Wx.pm
   trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/default.pm
   trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/forwarded_view.pm
   trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/shutdown.pm
   trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/textctrl.pm
Log:
Updated tests and makefile

Modified: trunk/Catalyst-Engine-Wx/Makefile.PL
===================================================================
--- trunk/Catalyst-Engine-Wx/Makefile.PL	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/Makefile.PL	2007-11-09 18:07:34 UTC (rev 7115)
@@ -1,20 +1,27 @@
-#use ExtUtils::MakeMaker;
-use inc::Module::Install;
+use strict;
+use warnings;
+use ExtUtils::MakeMaker;
 
-name 'Catalyst-Engine-Wx';
-author 'Eriam Schaffter <eriam at cpan.org>';
-license 'perl';
-version_from 'lib/Catalyst/Engine/Wx.pm';
-abstract_from 'lib/Catalyst/Engine/Wx.pm';
+WriteMakefile(
+    ( MM->can( 'signature_target' ) ? ( SIGN => 1 ) : () ),
+    NAME          => 'Catalyst::Engine::Wx',
+    AUTHOR        => 'Eriam Schaffter <eriam at cpan.org>',
+    VERSION_FROM  => 'lib/Catalyst/Engine/Wx.pm',
+    ABSTRACT_FROM => 'lib/Catalyst/Engine/Wx.pm',
+    LICENSE       => 'perl',
+    PL_FILES      => {},
+    PREREQ_PM     => {
+        'Test::More' => 0,
+        'version'    => 0,
+        'POE'               => '0.38',
+        'POE::Loop::Wx'     => '0.03',
+        'Alien::wxWidgets'  => 0,
+        'Wx'                => '0.67',
+        'Class::Inspector'  => 0,
+        'Module::Reload'    => 0,
+        'Catalyst'          => 0,
+    },
+    dist  => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', },
+    clean => { FILES    => 'Catalyst-Engine-*' },
+);
 
-# Build the prerequisite list
-requires 'POE'              => '0.38';
-requires 'POE::Loop::Wx'    => 0;
-requires 'Alien::wxWidgets' => 0;
-requires 'Wx'               => 0;
-requires 'Class::Inspector' => 0;
-requires 'Module::Reload'   => 0;
-requires 'Catalyst'         => 0;
-
-
-WriteAll();

Modified: trunk/Catalyst-Engine-Wx/lib/Catalyst/Log/Wx.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/lib/Catalyst/Log/Wx.pm	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/lib/Catalyst/Log/Wx.pm	2007-11-09 18:07:34 UTC (rev 7115)
@@ -135,7 +135,7 @@
 
 =head1 SEE ALSO
 
-L<Catalyst>.
+Catalyst.
 
 =head1 AUTHOR
 

Modified: trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/default.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/default.pm	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/default.pm	2007-11-09 18:07:34 UTC (rev 7115)
@@ -6,7 +6,7 @@
 
 use Test::More;
 use Wx ':everything';
-use Catalyst::Engine::Wx::Event qw(EVT);
+use Catalyst::Engine::Wx::Event qw(CAT_EVT);
 
 use base 'Wx::Frame';
 
@@ -19,7 +19,7 @@
    
    ok (ref($self) eq 'TestAppWx::default', 'TestAppWx::default');
    
-   EVT( $self, '/textctrl' );
+   CAT_EVT( $self, '/textctrl' );
    
    return 1;
 }

Modified: trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/forwarded_view.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/forwarded_view.pm	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/forwarded_view.pm	2007-11-09 18:07:34 UTC (rev 7115)
@@ -6,7 +6,7 @@
 
 use Test::More;
 use Wx ':everything';
-use Catalyst::Engine::Wx::Event qw(EVT_BUTTON EVT_CLOSE EVT);
+use Catalyst::Engine::Wx::Event qw(CAT_EVT_BUTTON CAT_EVT_CLOSE CAT_EVT);
 
 use base 'Wx::Frame';
 
@@ -17,7 +17,7 @@
 
    ok (ref($self) eq 'TestAppWx::forwarded_view', 'TestAppWx::forwarded_view');
    
-   EVT( $c->stash->{_parent}, '/shutdown' );
+   CAT_EVT( $c->stash->{_parent}, '/shutdown' );
    
    return 1;
 }

Modified: trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/shutdown.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/shutdown.pm	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/shutdown.pm	2007-11-09 18:07:34 UTC (rev 7115)
@@ -6,7 +6,7 @@
 
 use Test::More;
 use Wx ':everything';
-use Catalyst::Engine::Wx::Event qw(EVT_QUIT);
+use Catalyst::Engine::Wx::Event qw(CAT_EVT_QUIT);
 
 use base 'Catalyst::View::Wx';
 
@@ -15,9 +15,7 @@
 
    my $self = $c->stash->{_parent};
    
-#   ok (ref($self) eq 'TestAppWx::default', 'TestAppWx::default');
-
-   EVT_QUIT;
+   CAT_EVT_QUIT;
    
    return;
 }

Modified: trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/textctrl.pm
===================================================================
--- trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/textctrl.pm	2007-11-09 17:50:52 UTC (rev 7114)
+++ trunk/Catalyst-Engine-Wx/t/lib/TestAppWx/textctrl.pm	2007-11-09 18:07:34 UTC (rev 7115)
@@ -6,7 +6,7 @@
 
 use Test::More;
 use Wx ':everything';
-use Catalyst::Engine::Wx::Event qw(EVT_BUTTON EVT_CLOSE EVT);
+use Catalyst::Engine::Wx::Event qw(CAT_EVT_BUTTON CAT_EVT_CLOSE CAT_EVT);
 
 use base 'Wx::TextCtrl';
 
@@ -17,7 +17,7 @@
 
    ok (ref($self) eq 'TestAppWx::textctrl', 'TestAppWx::textctrl');
    
-   EVT( $c->stash->{_parent}, '/event_with_params', { scalar => 'data', array => ['test', 'of', 'array'] } );
+   CAT_EVT( $c->stash->{_parent}, '/event_with_params', { scalar => 'data', array => ['test', 'of', 'array'] } );
    
    return 1;
 }