#!perl
use Cassandane::Tiny;

sub test_badscript_timsieved
{
    my ($self) = @_;

    xlog $self, "Testing sieve script compile failures, via timsieved";
    $self->{compile_method} = 'timsieved';
    $self->badscript_common();
}
