16 lines
524 B
Perl
16 lines
524 B
Perl
#!/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
|