[Catalyst-commits] r11097 - Catalyst-Devel/1.00/branches/moosify_api/lib/Catalyst/Helper

[dhoss at dev.catalyst.perl.org]

Author: dhoss
Date: 2009-08-10 08:12:38 +0000 (Mon, 10 Aug 2009)
New Revision: 11097

Modified:
   Catalyst-Devel/1.00/branches/moosify_api/lib/Catalyst/Helper/AppGen.pm
Log:
removed quoting from custom types


Modified: Catalyst-Devel/1.00/branches/moosify_api/lib/Catalyst/Helper/AppGen.pm
===================================================================
--- Catalyst-Devel/1.00/branches/moosify_api/lib/Catalyst/Helper/AppGen.pm	2009-08-10 07:00:36 UTC (rev 11096)
+++ Catalyst-Devel/1.00/branches/moosify_api/lib/Catalyst/Helper/AppGen.pm	2009-08-10 08:12:38 UTC (rev 11097)
@@ -3,7 +3,7 @@
 use Moose;
 use namespace::autoclean;
 use Moose::Util::TypeConstraints;
-use MooseX::Types -declare [qw/ ValidAppName ValidAppComponent /];
+use MooseX::Types -declare [qw/ ValidAppName ValidAppComponent Dir AppEnv/];
 use namespace::autoclean;
 
 extends { 'Catalyst::Helper' };
@@ -37,14 +37,14 @@
 
 has name => ( 
     is => 'ro', 
-    isa => 'ValidAppName',
+    isa => ValidAppName,
     traits => [qw(Getopt)],
     cmd_aliases => 'n',
 );
 
 has dir  => ( 
     is => 'ro', 
-    isa => 'Dir',
+    isa => Dir,
     traits => [qw(Getopt)],
     cmd_aliases => 'dir', 
 
@@ -64,7 +64,7 @@
 
 has app_env => (
     is => 'ro',
-    isa => 'ValidAppEnv',
+    isa => ValidAppEnv,
     traits => [qw(NoGetopt)],
 );