#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); service_link_enhanced("dovecot", "S65", "7"); service_link_enhanced("dovecot", "K35", "6"); service_link_enhanced("dovecot", "K35", "0"); service_link_enhanced("dovecot", "K35", "1"); templates2events("/etc/dovecot/dovecot.conf", qw(email-update bootstrap-console-save)); templates2events("/etc/dovecot/master.users", qw(email-update bootstrap-console-save)); templates2events("/etc/pam.d/dovecotadmin", qw(email-update bootstrap-console-save)); safe_touch("root/var/service/dovecot/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/dovecot'); safe_symlink("/var/service/dovecot" , 'root/service/dovecot'); safe_symlink("adjust", "root/etc/e-smith/events/email-update/services2adjust/dovecot"); # Create a symlink for /service/imap so pop3s still find the imapd.pem file safe_symlink("/var/service/dovecot", "root/service/imap"); event_link("adjust-dovecot", "email-update", "02"); event_link("adjust-dovecot", "bootstrap-console-save", "02"); event_link("dovecot-acl", "email-update", "85"); event_link("dovecot-acl", "user-create", "85"); safe_touch("root/etc/dovecot/sharedmailbox/dict.db");