smeserver-wsdd/createlinks

43 lines
980 B
Perl

#! /usr/bin/perl -w
# Need some thought on when the templates should be expanded and when the action should be called.
use esmith::Build::CreateLinks qw(:all);
# my $event = "wsdd-update";
# wsdd-update
foreach (qw(
/usr/lib/systemd/system/wsdd.service.d/50-koozali.conf
))
{
templates2events("$_", qw(
post-upgrade
console-save
bootstrap-console-save
remoteaccess-update
ibay-modify
ibay-create
ibay-delete
workgroup-update
));
}
# rpm update action (invoked by yum on install and update
$contrib = "smeserver-wsdd";
$event = "$contrib-update";
event_actions($event, qw(
systemd-default 10
));
event_templates($event, qw(
/usr/lib/systemd/system/wsdd.service.d/50-koozali.conf
/etc/systemd/system-preset/49-koozali.preset
/etc/rc.d/init.d/masq
));
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/wsdd");
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/masq");