migrate Wizard getForm to FormBuilder
This commit is contained in:
parent
2170509c0f
commit
37f392b4c8
4 changed files with 59 additions and 54 deletions
|
|
@ -188,17 +188,21 @@ sub www_pickStyle {
|
|||
$synopsis =~ s{(https?://\S+)}{<a href="$1">$1</a>}g;
|
||||
$synopsis = WebGUI::HTML::format( $synopsis );
|
||||
|
||||
$f->raw(
|
||||
'<div class="stylePicker' . $class . '"><label><input type="radio" name="styleTemplateId" value="' . $style->getId . '"/>'
|
||||
. '<img src="' . $style->getExampleImageUrl . '" height="150" />'
|
||||
. '<div class="title">' . $style->getTitle . '</div>'
|
||||
. '<div class="synopsis">' . $synopsis . '</div></label>'
|
||||
. '</div>'
|
||||
my $label = '<img src="' . $style->getExampleImageUrl . '" height="150" />'
|
||||
. '<div class="title">' . $style->getTitle . '</div>'
|
||||
. '<div class="synopsis">' . $synopsis . '</div></label>'
|
||||
;
|
||||
|
||||
$f->addField( "radio",
|
||||
name => "styleTemplateId",
|
||||
value => $style->getId,
|
||||
subtext => $label,
|
||||
rowClass => 'stylePicker' . $class,
|
||||
extras => 'onclick="this.form.submit()"',
|
||||
);
|
||||
}
|
||||
$f->submit;
|
||||
|
||||
$output .= $f->print;
|
||||
$output .= $f->toHtml;
|
||||
|
||||
return $output . '<div style="clear: both;"> </div>';
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue