#!/usr/bin/perl -w

use esmith::Build::CreateLinks qw(:all);

event_link("user-reset-expired",         "password-modify",             "80");
event_link("user-expire-account",        "user-expire-account",         "20");
event_link("user-update-auto-response",  "user-expire-account",         "25");
event_link("user-lock-passwd",           "user-expire-account",         "30");
event_link("count-active-user-accounts", "user-expire-account",         "40");
event_link("ldap-update-simple",         "user-expire-account",         "50");
event_link("qmail-update-user",          "user-expire-account",         "60");

event_link("user-update-auto-response",  "user-update-expire-settings", "20");
event_link("qmail-update-user",          "user-update-expire-settings", "60");

panel_link("expireaccounts", 'manager');