#!/usr/bin/perl -w

use esmith::Build::CreateLinks qw(:all);

panel_link('minilist','manager');

event_link("qmail-update-list", "list-create", "20");
event_link("qmail-update-list", "list-modify", "20");
event_link("qmail-delete-list", "list-delete", "20");
event_link("qmail-update-list", "email-update", "20");
event_link("qmail-update-list", "bootstrap-console-save", "55");
templates2events("/var/service/qpsmtpd/config/goodrcptto", qw(list-create list-modify list-delete));
templates2events("/var/service/qpsmtpd/config/badrcptto", qw(list-create list-modify list-delete));
templates2events("/var/qmail/control/badrcptto", qw(list-create list-modify list-delete));
safe_symlink("sighub", "root/etc/e-smith/events/list-create/services2adjust/qmail");
safe_symlink("sighub", "root/etc/e-smith/events/list-modify/services2adjust/qmail");
safe_symlink("sighub", "root/etc/e-smith/events/list-delete/services2adjust/qmail");