--- trunk/lib/Frey/ObjectBrowser.pm 2008/07/10 19:37:19 88 +++ trunk/lib/Frey/ObjectBrowser.pm 2008/07/10 20:00:54 89 @@ -34,6 +34,9 @@ sub html { my ( $self, $req ) = @_; + my $f = { $req->params }; + my $layout = delete( $f->{layout} ) || 'div'; + use Strix::User; use Strix::View::User; @@ -45,25 +48,41 @@ while ( my $u = $s->next ) { my $w = Strix::View::User->new( %{ $u } ); $w->_fey( $u ); + $w->_layout( $layout ); warn "# w = ",dump( $w ) if $self->debug; push @w, $w; } - my $f = { $req->params }; - while ( 1 ) { warn "# got $#w elements: ",dump( map { $_->id } @w ); warn "<<< GOT REQUEST ",dump( $f ); - warn "does last element have id? ",dump( $w[$#w]->id ); + # re-apply (changed?) layout to elements + if ( defined $f->{layout} ) { + $layout = delete( $f->{layout} ); + warn "# new layout = $layout\n"; + } + + my $rows_delimiter = '