#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); service_link_enhanced("memcached-sogo", "S55", "7"); service_link_enhanced("sogod", "S85", "7"); templates2events("/etc/e-smith/sql/init/30sogo_mysql_create_database", qw(email-update bootstrap-console-save)); templates2events("/etc/e-smith/sql/init/31sogo_mysql_update_privileges", qw(email-update bootstrap-console-save)); templates2events("/home/sogo/smeserver/sogo_mysql_update_privileges.sql", qw(email-update bootstrap-console-save)); templates2events("/etc/cron.d/sogo-alarm", qw(email-update bootstrap-console-save)); templates2events("/home/sogo/GNUstep/Defaults/.GNUstepDefaults", qw(email-update bootstrap-console-save pre-backup)); templates2events("/etc/sysconfig/sogo", qw(email-update bootstrap-console-save)); templates2events("/etc/logrotate.d/sogo", qw(email-update bootstrap-console-save)); safe_symlink("restart", "root/etc/e-smith/events/email-update/services2adjust/sogod"); safe_symlink("restart", "root/etc/e-smith/events/email-update/services2adjust/memcached-sogo"); safe_symlink("restart", "root/etc/e-smith/events/email-update/services2adjust/mysql.init"); event_link("sogo-delete-backup", "pre-backup", "60"); event_link("sogo-delete-backup", "post-backup", "60"); event_link("sogo-backup", "pre-backup", "70"); panel_link("sogo", "manager"); safe_touch("root/var/service/memcached-sogo/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/memcached-sogo'); safe_symlink("/var/service/memcached-sogo" , 'root/service/memcached-sogo');