X-Git-Url: https://git.decadent.org.uk/gitweb/?a=blobdiff_plain;f=lib%2FMaypole%2FCLI.pm;h=5524c7268d49c5eea1e28ad7d5b42db4f21c9b83;hb=0ac4811fdd89ce1736ddc797b13527f482298130;hp=8b7107b7b164a33a421cff6963896fb98dacc35f;hpb=12c042be5955bba42e21dde9c57f690035eaca71;p=maypole.git diff --git a/lib/Maypole/CLI.pm b/lib/Maypole/CLI.pm index 8b7107b..5524c72 100644 --- a/lib/Maypole/CLI.pm +++ b/lib/Maypole/CLI.pm @@ -31,7 +31,7 @@ sub send_output { $buffer = shift->{output} } # Do it! CHECK { if ((caller(0))[1] eq "-e") { - $package->handler() and print $buffer; + $package->handler() == OK and print $buffer; } } 1;