Remove some deprecated form code.

perlDreamer · perlDreamer · commit f4b248f76f2e · 2011-11-24T12:06:05.000-08:00
diff --git a/lib/WebGUI/Form/SelectList.pm b/lib/WebGUI/Form/SelectList.pm
@@ -134,7 +134,7 @@ sub toHtml {
 		$output .= '>'.$options->{$key}.'</option>';
 	}
 	$output .= '</select>'."\n";
-    $output .= WebGUI::Form::Hidden($session, { name => $self->privateName('isIn'), value => 1, });
+    $output .= WebGUI::Form::Hidden->new($session, { name => $self->privateName('isIn'), value => 1, })->toHtml;
 	return $output;
 }
 

Original file line number	Diff line number	Diff line change
`@@ -134,7 +134,7 @@ sub toHtml {`
`134`	`134`	`$output .= '>'.$options->{$key}.'</option>';`
`135`	`135`	`}`
`136`	`136`	`$output .= '</select>'."\n";`
`137`		`- $output .= WebGUI::Form::Hidden($session, { name => $self->privateName('isIn'), value => 1, });`
	`137`	`+ $output .= WebGUI::Form::Hidden->new($session, { name => $self->privateName('isIn'), value => 1, })->toHtml;`
`138`	`138`	`return $output;`
`139`	`139`	`}`
`140`	`140`