#!/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"); templates2events("/var/service/qpsmtpd/config/goodrcptto", qw(list-create list-modify list-delete));