initial commit of file from CVS for smeserver-mailsorting on Sat Sep 7 19:56:19 AEST 2024
This commit is contained in:
21
createlinks
Normal file
21
createlinks
Normal file
@@ -0,0 +1,21 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
use esmith::Build::CreateLinks qw(:all);
|
||||
use File::Basename;
|
||||
use File::Path;
|
||||
|
||||
event_link("mailsorting-cleanup", "user-delete", "65");
|
||||
|
||||
event_link("mailsorting-update-user", 'mailsorting-conf', "20");
|
||||
event_link("qmail-update-user", 'mailsorting-conf', "30");
|
||||
|
||||
event_link("mailsorting-update-user", "email-update-quick", "20");
|
||||
event_link("mailsorting-update-user", "email-update", "20");
|
||||
event_link("mailsorting-update-user", "user-create", "60");
|
||||
event_link("mailsorting-update-user", "user-modify", "60");
|
||||
event_link("mailsorting-update-user", "bootstrap-console-save", "60");
|
||||
|
||||
my $event="smeserver-mailsorting-update";
|
||||
event_link("mailsorting-update-user", $event, "20");
|
||||
event_link("qmail-update-user", $event, "30");
|
||||
|
Reference in New Issue
Block a user