Fixing label and uiLevel.

This commit is contained in:
Martin Kamerbeek 2004-12-28 15:18:39 +00:00
parent cbb4f662c4
commit f1806d943c

View file

@ -196,6 +196,8 @@ sub new {
tie %tabs, 'Tie::IxHash';
foreach my $key (keys %{$startingTabs}) {
$tabs{$key}{form} = WebGUI::HTMLForm->new;
$tabs{$key}{label} = $startingTabs->{$key}->{label};
$tabs{$key}{uiLevel} = $startingTabs->{$key}->{uiLevel};
}
my $cancel = WebGUI::Form::button({
value=>WebGUI::International::get('cancel'),