7 use lib "$FindBin::Bin/lib";
9 use Storable qw/lock_store lock_retrieve/;
12 use Catalyst::Test 'TestApp';
14 our $STATE = "$FindBin::Bin/lib/TestApp/scheduler.state";
15 our $BASE = 'Catalyst::Plugin::Scheduler::Base';
17 # hack the last event check to make all events execute immediately
18 $BASE->_last_check_time( 0 );
20 # configure a yaml file
21 TestApp->config->{scheduler}->{yaml_file}
22 = "$FindBin::Bin/lib/TestApp/test.yml";
24 # test that the plugin event executes
26 ok( my $res = request('http://localhost/'), 'request ok' );
27 is( $res->content, 'default', 'response ok' );
28 is( -e "$FindBin::Bin/lib/TestApp/every_minute.log", 1, 'every_minute executed ok' );
29 unlink "$FindBin::Bin/lib/TestApp/every_minute.log";
32 # test that a YAML trigger works
34 ok( my $res = request('http://localhost/?schedule_trigger=some_long_trigger_name'), 'request ok' );
35 is( $res->content, 'default', 'response ok' );
36 is( -e "$FindBin::Bin/lib/TestApp/every_minute.log", 1, 'every_minute executed ok' );
37 unlink "$FindBin::Bin/lib/TestApp/every_minute.log";