set licencingmenu_items {
GuidoMenuItem weblicencing {
-label "Request licence"
-icon "icons/16/update_licence.png"
-command server "REQUEST LICENSE"
}
GuidoMenuItem licensing {
-label "Change /Inspect Licence"
-icon "icons/16/update_licence.png"
-command server "UPDATE LICENCE"
}
GuidoMenuItem log {
-label "Activity Log"
-icon "icons/16/activity_log.png"
-command script scripts/usageLog.tcl
}
}
GuidoMenu licencingmenu {
-label "Licencing"
-delayed_script $licencingmenu_items
}
