diff --git a/lib/WebGUI/FormBuilder.pm b/lib/WebGUI/FormBuilder.pm index 9ff9b17ee..7fa9df592 100644 --- a/lib/WebGUI/FormBuilder.pm +++ b/lib/WebGUI/FormBuilder.pm @@ -56,10 +56,10 @@ other possible value is "application/x-www-form-urlencoded". =cut -sub new { +sub BUILDARGS { my ( $class, $session, %properties ) = @_; $properties{ session } = $session; - return $class->SUPER::new( %properties ); + return \%properties; } #---------------------------------------------------------------------------- diff --git a/lib/WebGUI/FormBuilder/Fieldset.pm b/lib/WebGUI/FormBuilder/Fieldset.pm index 8a1211321..a9faf4c88 100644 --- a/lib/WebGUI/FormBuilder/Fieldset.pm +++ b/lib/WebGUI/FormBuilder/Fieldset.pm @@ -59,11 +59,11 @@ Optional. A synonym for C