[Bps-public-commit] Path-Dispatcher branch, master, updated. eb5928a6bbc288143532fadba53249fa8c7a62e6
sartak at bestpractical.com
sartak at bestpractical.com
Fri Nov 6 20:51:29 EST 2009
The branch, master has been updated
via eb5928a6bbc288143532fadba53249fa8c7a62e6 (commit)
from 3f44b9aeb07119f8232180ac2cf696eb520cf145 (commit)
Summary of changes:
t/023-lazy-dispatch.t | 23 -----------------------
1 files changed, 0 insertions(+), 23 deletions(-)
delete mode 100644 t/023-lazy-dispatch.t
- Log -----------------------------------------------------------------
commit eb5928a6bbc288143532fadba53249fa8c7a62e6
Author: Shawn M Moore <sartak at bestpractical.com>
Date: Fri Nov 6 20:51:22 2009 -0500
Revert "Add failing test for lazy dispatch"
This reverts commit bebbcd409d413eee785df4b901c85db614b60750.
Going to work on a branch instead
diff --git a/t/023-lazy-dispatch.t b/t/023-lazy-dispatch.t
deleted file mode 100644
index 588fe72..0000000
--- a/t/023-lazy-dispatch.t
+++ /dev/null
@@ -1,23 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use Test::More tests => 1;
-use Path::Dispatcher;
-
-my @calls;
-
-my $dispatcher = Path::Dispatcher->new;
-$dispatcher->add_rule(
- Path::Dispatcher::Rule::Tokens->new(
- tokens => ['hello'],
- block => sub { push @calls, 'hello' },
- ),
- Path::Dispatcher::Rule::CodeRef->new(
- matcher => sub { fail("should never run") },
- block => sub { push @calls, 'fail' },
- ),
-);
-
-$dispatcher->run('foo bar');
-is_deeply([splice @calls], ['hello']);
-
-----------------------------------------------------------------------
More information about the Bps-public-commit
mailing list