#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/mailman'); safe_symlink("/var/service/mailman" , 'root/service/mailman'); safe_touch("root/var/service/mailman/down"); foreach my $event (qw/webapps-update ipasserelle-update bootstrap-ldap-save/){ event_link("ipasserelle-mailman-init-domain", "$event", "55"); } foreach my $event (qw(mailman-addlist mailman-rmlist)){ event_link($event, $event, "02"); templates2events("/var/service/qpsmtpd/config/goodrcptto", $event); templates2events("/var/qmail/users/assign", $event); safe_symlink("/var/qmail/bin/qmail-newu", "root/etc/e-smith/events/$event/S55email-assign"); safe_symlink("sighup", "root/etc/e-smith/events/$event/services2adjust/qpsmtpd"); safe_symlink("sighup", "root/etc/e-smith/events/$event/services2adjust/sqpsmtpd"); } templates2events( "/usr/lib/mailman/Mailman/mm_cfg.py", "bootstrap-console-save"); foreach my $event (qw(mailman-update domain-create domain-delete)){ templates2events( "/usr/lib/mailman/Mailman/mm_cfg.py", $event); templates2events( "/etc/httpd/conf/httpd.conf", $event); safe_symlink("/usr/lib/mailman/bin/post-install", "root/etc/e-smith/events/$event/S20mailman-post-install"); safe_symlink("../actions/mailman-restart", "root/etc/e-smith/events/$event/S94mailman-restart"); } safe_symlink("sigusr1", "root/etc/e-smith/events/mailman-update/services2adjust/httpd-e-smith"); service_link_enhanced('mailman', 'S98', '7'); service_link_enhanced('mailman', 'K12', '6'); service_link_enhanced('mailman', 'K12', '0');