#!/usr/bin/perl -w
use lib '.'; use lib 't';
use WMTest; webmake_t_init("contentsfind");
use Test; BEGIN { plan tests => 8 };
# ---------------------------------------------------------------------------
%patterns = (
  q{This is foo.}, 'foo',
  q{This is bar.}, 'bar',
  q{This is baz.}, 'baz',
);
%anti_patterns = (
  q{I am floop}, 'floop',
);
ok (wmrun ("-F -f data/$testname.wmk", \&patterns_run_cb));
ok_all_patterns();