#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); for my $event (qw( post-upgrade bugzilla-update smeserver-bugzilla-update )) { templates2events("/etc/bugzilla.conf", $event); templates2events("/etc/bugzilla/localconfig", $event); templates2events("/etc/e-smith/sql/init105/91bugzilla", $event); } for my $event (qw( bugzilla-update smeserver-bugzilla-update )) { templates2events("/etc/httpd/conf/httpd.conf", $event); safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/httpd-e-smith"); event_link("bugzilla", $event, "91"); safe_symlink("restart","root/etc/e-smith/events/$event/services2adjust/mariadb105-mysql.init") }