Commit | Line | Data |
---|---|---|
75f37967 | 1 | # Copyright (c) 2007 Jonathan Rockway <jrockway@cpan.org>\r |
2 | \r | |
3 | use strict;\r | |
4 | use warnings;\r | |
5 | use Test::More tests => 3;\r | |
6 | \r | |
7 | use FindBin qw($Bin);\r | |
8 | use lib "$Bin/lib";\r | |
9 | use Catalyst::Test qw(TestApp);\r | |
10 | \r | |
11 | is( get('/stash'), 'it worked', q{stashing works} );\r | |
12 | is( get('/cycle'), '1', 'no cycles');\r | |
13 | is( get('/weak_cycle'), '1', 'found weak cycle');\r |