t/02-live-stash.t

   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