1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#!/usr/bin/perl -T
use lib '.'; use lib 't';
use SATest; sa_t_init("lint_nocreate_prefs");
use Test::More tests => 2;
# ---------------------------------------------------------------------------
tstpre ("
loadplugin Mail::SpamAssassin::Plugin::AWL
");
%patterns = ( qr/^/, 'anything' );
# override locale for this test!
$ENV{'LANGUAGE'} = $ENV{'LC_ALL'} = 'C';
sarun ("-L --lint --prefspath=$workdir/prefs", \&patterns_run_cb);
ok_all_patterns();
ok (!-f "$workdir/prefs");
|
