14 lines
494 B
Perl
14 lines
494 B
Perl
#!/usr/bin/perl -w
|
|
|
|
use esmith::Build::CreateLinks qw(:all);
|
|
|
|
|
|
my $event ="smeserver-rsyncd-update";
|
|
|
|
safe_symlink("restart", "root/etc/e-smith/events/$event/services2adjust/rsyncd");
|
|
event_link("systemd-reload", $event, "89");
|
|
event_link("systemd-default", $event, "88");
|
|
|
|
templates2events("/etc/rsyncd.conf", ($event, qw(pre-backup bootstrap-console-save remoteaccess-update) ) );
|
|
templates2events("/etc/xinet.d/rsync", ($event, qw(pre-backup bootstrap-console-save remoteaccess-update) ) );
|