use strict;
use warnings;

use FindBin;
use lib "$FindBin::Bin/lib";

use Test::More tests => 6;

use Test::WWW::Mechanize::Catalyst 'TestApp';

my $ua = Test::WWW::Mechanize::Catalyst->new;

$ua->get_ok('http://localhost/vars/set_session/23');
$ua->get_ok('http://localhost/vars/test_session');
$ua->content_is('23');

$ua->get_ok('http://localhost/vars/set_flash/42');
$ua->get_ok('http://localhost/vars/test_flash');
$ua->content_is('42');