diff --git a/ui-lib.pl b/ui-lib.pl index 5ee482323..7510f2a95 100755 --- a/ui-lib.pl +++ b/ui-lib.pl @@ -1,5 +1,5 @@ use vars qw($theme_no_table $ui_radio_selector_donejs $module_name - $ui_multi_select_donejs); + $ui_multi_select_donejs, $ui_formcount); =head1 ui-lib.pl @@ -597,6 +597,7 @@ parameters are : =cut sub ui_form_start { +$ui_formcount ||= 0; return &theme_ui_form_start(@_) if (defined(&theme_ui_form_start)); my ($script, $method, $target, $tags) = @_; my $rv; @@ -630,6 +631,7 @@ of array refs, with the following elements : =cut sub ui_form_end { +$ui_formcount++; return &theme_ui_form_end(@_) if (defined(&theme_ui_form_end)); my ($buttons, $width) = @_; my $rv; @@ -1222,10 +1224,11 @@ $rv .= &ui_radio($name."_def", $value eq '' ? 1 : 0, [ 0, $opt2 || " ", "onClick='$dis2'" ] ], $dis)."\n"; $rv .= "\n"; +$rv .= "\n"; return $rv; }