#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); service_link_enhanced("iaxmodem", "S95", "7"); service_link_enhanced("iaxmodem", "K05", "6"); service_link_enhanced("iaxmodem", "K05", "0"); safe_symlink("restart", "root/etc/e-smith/events/fax-update/services2adjust/hylafax"); safe_symlink("restart", "root/etc/e-smith/events/fax-update/services2adjust/iaxmodem"); safe_symlink("restart", "root/etc/e-smith/events/fax-update/services2adjust/iaxmodem2"); templates2events("/etc/iaxmodem/iaxmodem-cfg.ttyIAX", qw(fax-update bootstrap-console-save)); templates2events("/etc/iaxmodem/iaxmodem-cfg.ttyIAX2", qw(fax-update bootstrap-console-save)); templates2events("/etc/inittab", qw(fax-update)); safe_touch("root/var/service/iaxmodem/down"); safe_touch("root/var/service/iaxmodem2/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/iaxmodem'); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/iaxmodem2'); safe_symlink("/var/service/iaxmodem" , 'root/service/iaxmodem'); safe_symlink("/var/service/iaxmodem2" , 'root/service/iaxmodem2');