initial commit of file from CVS for smeserver-subversion on Sat Sep 7 16:43:25 AEST 2024
This commit is contained in:
50
createlinks
Normal file
50
createlinks
Normal file
@@ -0,0 +1,50 @@
|
||||
#!/usr/bin/perl -w
|
||||
|
||||
use esmith::Build::CreateLinks qw(:all);
|
||||
|
||||
for my $event (qw(
|
||||
repository-create
|
||||
repository-modify
|
||||
repository-delete
|
||||
subversion-modify
|
||||
user-create
|
||||
user-modify
|
||||
user-delete
|
||||
group-modify
|
||||
group-delete
|
||||
))
|
||||
{
|
||||
safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/httpd-e-smith");
|
||||
templates2events("/etc/httpd/conf/httpd.conf", $event)
|
||||
}
|
||||
|
||||
for my $event (qw(
|
||||
repository-modify
|
||||
repository-create
|
||||
))
|
||||
{
|
||||
event_link("repository-modify", $event, "05");
|
||||
}
|
||||
|
||||
for my $event (qw(
|
||||
repository-delete
|
||||
subversion-delete
|
||||
))
|
||||
{
|
||||
event_link($event, $event, "05");
|
||||
}
|
||||
|
||||
for my $event (qw(
|
||||
user-delete
|
||||
group-delete
|
||||
))
|
||||
{
|
||||
event_link("subversion-delete-from-access-list", $event, "04");
|
||||
}
|
||||
|
||||
panel_link('subversion', 'manager');
|
||||
|
||||
my $event= "smeserver-subversion-update";
|
||||
safe_symlink("sigusr1", "root/etc/e-smith/events/$event/services2adjust/httpd-e-smith");
|
||||
templates2events("/etc/httpd/conf/httpd.conf", $event)
|
||||
|
Reference in New Issue
Block a user