my $dp = Web::Dispatch::Parser->new;
-TODO: {
- local $TODO = 'according to the synopsis this should work';
- my $all = eval {
- $dp->parse('');
- };
- ok $all;
- eval {
- is_deeply(
- [ $all->({ REQUEST_METHOD => 'GET' }) ],
- [ {} ],
- 'GET matches'
- );
+{
+ my $all = $dp->parse('');
- is_deeply(
- [ $all->({ REQUEST_METHOD => 'POST' }) ],
- [ {} ],
- 'POST matches'
- );
- };
+ is_deeply(
+ [ $all->({ REQUEST_METHOD => 'GET' }) ],
+ [ {} ],
+ 'GET matches'
+ );
+
+ is_deeply(
+ [ $all->({ REQUEST_METHOD => 'POST' }) ],
+ [ {} ],
+ 'POST matches'
+ );
};
{