added a bunch of style functions

This commit is contained in:
JT Smith 2004-01-04 06:02:28 +00:00
parent 264287a0fb
commit 759dfd2f6b
22 changed files with 75 additions and 36 deletions

View file

@ -318,6 +318,7 @@ sub www_editSave {
#-------------------------------------------------------------------
sub www_editEvent {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditWobject($_[0]->get("wobjectId")));
$session{page}{useAdminStyle} = 1;
my (%recursEvery, $special, $output, $f, %event);
tie %event, 'Tie::CPHash';
tie %recursEvery, 'Tie::IxHash';