allowing UI levels for assets to be overridden in the config file, and allowing developers to specify a default UI level in the definition rather than creating a getUiLevel() method

lib/WebGUI/Asset/Wobject/Survey.pm

@@ -65,6 +65,7 @@ sub definition {
         my $definition = shift;
         push(@{$definition}, {
 		assetName=>WebGUI::International::get(1,'Asset_Survey'),
+		uiLevel => 5,
 		icon=>'survey.gif',
 		tableName	=> 'Survey',
 		className	=> 'WebGUI::Asset::Wobject::Survey',
@@ -618,11 +619,6 @@ sub setAnswerType {
 		},1,0,"Survey_id");
 }
 
-#-------------------------------------------------------------------
-sub getUiLevel {
-	return 5;
-}
-
 #-------------------------------------------------------------------
 sub view {
 	my $self = shift;