smeserver-userpanels/createlinks

11 lines
202 B
Perl

#!/usr/bin/perl -w
use esmith::Build::CreateLinks qw(:all);
use File::Basename;
use File::Path;
event_link("calc-du", "calc-du", "20");
event_link("qmail-update-user", "email-update-quick", "20");