Bug 15545: Remove reqholdnotes from opac-reserve
[koha.git] / t / Koha / wait.pl
1 #!/usr/bin/perl
2
3 use Modern::Perl;
4
5 use Koha::Script;
6
7 # # Lock execution
8 my $script = Koha::Script->new({ script => 'sleep.pl' });
9
10 $script->lock_exec({ wait => 1 });
11
12 print STDOUT "YAY!";
13
14 # Normal exit
15 1;