#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); foreach my $event (qw/bootstrap-console-save share-modify ibay-modify/){ templates2events("/etc/clamrt.list", $event); safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/clamrt"); } <<<<<<< HEAD ======= safe_touch("root/var/service/clamrt/down"); safe_symlink("../daemontools" , 'root/etc/rc.d/init.d/supervise/clamrt'); safe_symlink("/var/service/clamrt" , 'root/service/clamrt'); >>>>>>> c99401afc73e86cc62d04be2dab94651b24af879