[Catalyst-commits] r6807 - trunk/Catalyst-View-Mason/t

[rafl at dev.catalyst.perl.org]

Author: rafl
Date: 2007-08-28 17:03:57 +0100 (Tue, 28 Aug 2007)
New Revision: 6807

Modified:
   trunk/Catalyst-View-Mason/t/helper.t
Log:
Check that modules generated by the helper inherit from the view.


Modified: trunk/Catalyst-View-Mason/t/helper.t
===================================================================
--- trunk/Catalyst-View-Mason/t/helper.t	2007-08-28 16:03:54 UTC (rev 6806)
+++ trunk/Catalyst-View-Mason/t/helper.t	2007-08-28 16:03:57 UTC (rev 6807)
@@ -16,7 +16,7 @@
 eval 'use Catalyst::Helper';
 plan skip_all => 'Catalyst::Helper required' if $@;
 
-plan tests => 3;
+plan tests => 4;
 
 my $app_name = 'TestApp';
 my $old_cwd  = cwd;
@@ -42,6 +42,7 @@
 }, 'module compiles fine');
 
 ok(!TestApp::View::Mason->config->{use_match}, 'module sets use_match to false');
+ok(TestApp::View::Mason->isa('Catalyst::View::Mason'), 'module inherits from C::V::Mason');
 
 END {
     chdir $old_cwd;