[Bps-public-commit] r16360 - in Path-Dispatcher/trunk: lib/Path/Dispatcher t

sartak at bestpractical.com sartak at bestpractical.com
Sun Oct 19 05:42:07 EDT 2008


Author: sartak
Date: Sun Oct 19 05:42:07 2008
New Revision: 16360

Modified:
   Path-Dispatcher/trunk/   (props changed)
   Path-Dispatcher/trunk/lib/Path/Dispatcher/Dispatch.pm
   Path-Dispatcher/trunk/lib/Path/Dispatcher/Match.pm
   Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm
   Path-Dispatcher/trunk/t/002-rule.t

Log:
 r74122 at onn:  sartak | 2008-10-19 05:42:00 -0400
 Promote Match out of Dispatch/ (2/2)


Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher/Dispatch.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher/Dispatch.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher/Dispatch.pm	Sun Oct 19 05:42:07 2008
@@ -3,12 +3,12 @@
 use Moose;
 use MooseX::AttributeHelpers;
 
-use Path::Dispatcher::Dispatch::Match;
+use Path::Dispatcher::Match;
 
 has _matches => (
     metaclass => 'Collection::Array',
     is        => 'rw',
-    isa       => 'ArrayRef[Path::Dispatcher::Dispatch::Match]',
+    isa       => 'ArrayRef[Path::Dispatcher::Match]',
     default   => sub { [] },
     provides  => {
         push     => 'add_match',

Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher/Match.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher/Match.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher/Match.pm	Sun Oct 19 05:42:07 2008
@@ -1,5 +1,5 @@
 #!/usr/bin/env perl
-package Path::Dispatcher::Dispatch::Match;
+package Path::Dispatcher::Match;
 use Moose;
 
 use Path::Dispatcher::Stage;

Modified: Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm
==============================================================================
--- Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm	(original)
+++ Path-Dispatcher/trunk/lib/Path/Dispatcher/Rule.pm	Sun Oct 19 05:42:07 2008
@@ -2,10 +2,10 @@
 package Path::Dispatcher::Rule;
 use Moose;
 
-use Path::Dispatcher::Dispatch::Match;
+use Path::Dispatcher::Match;
 use Path::Dispatcher::Stage;
 
-sub match_class { "Path::Dispatcher::Dispatch::Match" }
+sub match_class { "Path::Dispatcher::Match" }
 
 has block => (
     is        => 'ro',

Modified: Path-Dispatcher/trunk/t/002-rule.t
==============================================================================
--- Path-Dispatcher/trunk/t/002-rule.t	(original)
+++ Path-Dispatcher/trunk/t/002-rule.t	Sun Oct 19 05:42:07 2008
@@ -16,7 +16,7 @@
     },
 );
 
-isa_ok($rule->match('foobar'), 'Path::Dispatcher::Dispatch::Match');
+isa_ok($rule->match('foobar'), 'Path::Dispatcher::Match');
 is_deeply($rule->match('foobar')->result, ['fo', 'ob']);
 is_deeply([splice @calls], [], "block not called on match");
 



More information about the Bps-public-commit mailing list