#!/usr/bin/perl -w # This script creates the symlinks needed by this RPM use strict; use esmith::Build::CreateLinks qw(:all); #------------------------------------------------------------------- # actions for bootstrap-console-save event, e-smith-tinydns-update : #------------------------------------------------------------------- foreach (qw( env/IP env/DATALIMIT root/data )) { templates2events("/var/service/tinydns/$_", qw( bootstrap-console-save e-smith-tinydns-update )); } #-------------------------------------------------- # actions for ip-change event #-------------------------------------------------- my $event = "ip-change"; safe_symlink("sigusr2", "root/etc/e-smith/events/$event/services2adjust/tinydns"); #-------------------------------------------------- # actions for e-smith-tinydns-update event #-------------------------------------------------- $event = "e-smith-tinydns-update"; safe_symlink("try-restart", "root/etc/e-smith/events/$event/services2adjust/tinydns"); templates2events("/etc/systemd/system-preset/49-koozali.preset", $event); event_link("systemd-reload", $event, "89");