#!/usr/bin/perl -w use esmith::Build::CreateLinks qw(:all); use File::Basename; use File::Path; #wrong way #safe_symlink("/etc/e-smith/web/functions/wrapper","root/etc/e-smith/web/panels/manager/cgi-bin/user-email"); #real way panel_link("user-email","manager"); #-------------------------------------------------- # actions for smeserver-durep-update: #-------------------------------------------------- my $event = "smeserver-email-management-update"; # yum plugin already call this #event_link("navigation-conf", $event, "50");