28 lines
876 B
Plaintext
28 lines
876 B
Plaintext
|
#!/usr/bin/perl -w
|
||
|
|
||
|
use esmith::Build::CreateLinks qw(:all);
|
||
|
use esmith::Build::Backup qw(:all);
|
||
|
|
||
|
#--------------------------------------------------
|
||
|
# functions for manager-locale
|
||
|
#--------------------------------------------------
|
||
|
my $mngrdir = '/usr/share/smanager';
|
||
|
my @languages = qw(___LANGUAGES___); #Editted in by the spec file.
|
||
|
|
||
|
foreach $lang (@languages){
|
||
|
$event = "smeserver-manager-locale-$lang-update";
|
||
|
|
||
|
# Services to restart
|
||
|
safe_symlink("restart",
|
||
|
"root/etc/e-smith/events/$event/services2adjust/smanager");
|
||
|
safe_symlink("reload",
|
||
|
"root/etc/e-smith/events/$event/services2adjust/httpd-e-smith");
|
||
|
|
||
|
# actions to perform
|
||
|
event_link('navigation2-conf', "$event", '80');
|
||
|
event_link('routes2-conf', "$event", '80');
|
||
|
event_link('locales2-conf', "$event", '80');
|
||
|
|
||
|
event_link('systemd-default', $event, '88');
|
||
|
event_link('systemd-reload', $event, '89');
|
||
|
}
|