initial commit of file from CVS for smeserver-subversion on Sat Sep 7 16:43:25 AEST 2024
This commit is contained in:
10
root/etc/e-smith/db/accounts/migrate/80subversionUsers
Normal file
10
root/etc/e-smith/db/accounts/migrate/80subversionUsers
Normal file
@@ -0,0 +1,10 @@
|
||||
{
|
||||
foreach my $repository ($DB->get_all_by_prop('type' => 'repository'))
|
||||
{
|
||||
my $property = $DB->get_prop_and_delete($repository->key, 'Users') or next;
|
||||
|
||||
$repository->merge_prop('UsersWrite', $property) unless $repository->prop('UsersWrite');
|
||||
$repository->merge_prop('UsersRead', $property) unless $repository->prop('UsersRead');
|
||||
|
||||
}
|
||||
}
|
Reference in New Issue
Block a user