--- trunk/lib/Frey/ObjectBrowser.pm 2008/07/11 09:25:02 93
+++ trunk/lib/Frey/ObjectBrowser.pm 2008/07/11 09:35:32 94
@@ -82,6 +82,17 @@
$form = qq|
| if $layout eq 'table';
+ my $layout_picker = join(' ',
+ qq|layout:|,
+ map {
+ if ( $layout eq $_ ) {
+ qq|
$_|;
+ } else {
+ qq|
$_|;
+ }
+ } ( 'div', 'table' ),
+ qq|
|,
+ );
my $doc = Continuity::Widget::DomNode->create(
html => [
@@ -90,12 +101,7 @@
],
body => [
h1 => [ 'Strix::User' ],
- $layout eq 'table' ?
- # gen_link doesn't work since Widngets have it's own scope of layout
-# gen_link( 'div layout', sub { $layout = 'div' } ) :
-# gen_link( 'table layout', sub { $layout = 'table' } ),
- qq|div layout| :
- qq|table layout|,
+ $layout_picker,
form => { method=>'post' } => [
$form,
],