15 lines
519 B
Perl
15 lines
519 B
Perl
#! /usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
|
|
templates2events("/etc/cron.d/Learn", qw(email-update bootstrap-console-save ));
|
|
safe_touch('root/etc/e-smith/db/configuration/defaults/Learn/Exclude');
|
|
safe_touch('root/etc/e-smith/db/configuration/defaults/Learn/Include');
|
|
|
|
my $event="smeserver-learn-update";
|
|
templates2events("/etc/cron.d/Learn",$event);
|
|
templates2events("/etc/mail/spamassassin/local.cf",$event);
|
|
event_link("LearnSpam-init", $event, "04");
|
|
event_link("LearnSpam-run", $event, "30");
|