Added UI Level basics to wobjects and preferences.

This commit is contained in:
JT Smith 2002-10-05 17:15:10 +00:00
parent 7bc98eed07
commit 95c08144f0
9 changed files with 64 additions and 9 deletions

View file

@ -51,6 +51,11 @@ sub set {
$_[0]->SUPER::set($_[1],[qw(template dbQuery DSN username identifier convertCarriageReturns paginateAfter preprocessMacros debugMode)]);
}
#-------------------------------------------------------------------
sub uiLevel {
return 9;
}
#-------------------------------------------------------------------
sub www_edit {
return WebGUI::Privilege::insufficient() unless (WebGUI::Privilege::canEditPage());