[Bps-public-commit] Path-Dispatcher: flexible and extensible dispatch branch, master, updated. 2fda2e776dcdda94fa54cc88312401dd5432a6c0

[sartak at bestpractical.com]

The branch, master has been updated
       via  2fda2e776dcdda94fa54cc88312401dd5432a6c0 (commit)
      from  e8d21f934e6362c11b8be6ba3987c5dce1ef0a29 (commit)

Summary of changes:
 t/801-cb-chaining.t |   12 +++---------
 1 files changed, 3 insertions(+), 9 deletions(-)

- Log -----------------------------------------------------------------
commit 2fda2e776dcdda94fa54cc88312401dd5432a6c0
Author: Shawn M Moore <sartak at gmail.com>
Date:   Tue Feb 24 16:03:43 2009 -0500

    Use "then" in the chaining test

diff --git a/t/801-cb-chaining.t b/t/801-cb-chaining.t
index d9b991f..11e0d93 100644
--- a/t/801-cb-chaining.t
+++ b/t/801-cb-chaining.t
@@ -11,15 +11,9 @@ do {
     use Path::Dispatcher::Declarative -base;
 
     under show => sub {
-        $Path::Dispatcher::Declarative::UNDER_RULE->add_rule(
-            Path::Dispatcher::Rule::Always->new(
-                stage => 'on',
-                block  => sub {
-                    push @result, "Displaying";
-                    next_rule;
-                },
-            ),
-        );
+        then {
+            push @result, "Displaying";
+        };
         on inventory => sub {
             push @result, "inventory";
         };

-----------------------------------------------------------------------