17 lines
257 B
Plaintext
17 lines
257 B
Plaintext
|
#!/usr/bin/perl -w
|
||
|
|
|
||
|
|
use esmith::Build::CreateLinks qw(:all);
|
||
|
|
|
||
|
|
foreach (qw(
|
||
|
|
user-modify
|
||
|
|
bootstrap-console-save
|
||
|
|
user-create
|
||
|
|
e-smith-quota-update
|
||
|
|
))
|
||
|
|
{
|
||
|
|
event_link("user-modify-quota", $_, "50");
|
||
|
|
}
|
||
|
|
|
||
|
|
panel_link("quota", "manager");
|
||
|
|
|