--- trunk/lib/Frey/ObjectBrowser.pm 2008/07/09 13:12:03 68 +++ trunk/lib/Frey/ObjectBrowser.pm 2008/07/09 16:41:00 72 @@ -26,6 +26,7 @@ use Data::Dump qw/dump/; use Data::Structure::Util qw(unbless); + #method 'html' => positional( # isa => 'Continuity::RequestHolder', # required => 1, @@ -48,17 +49,35 @@ while ( my $u = $s->next ) { warn "# u = ",dump( $u ); my $w = Strix::View::User->new( - # FIXME this is cludge - unbless( $u ) + #%{ unbless( $u ) }, # FIXME this is cludge + %{ $u } # much better :-) ); + $w->_fey( $u ); warn "# w = ",dump( $w ); push @w, $w; } while ( 1 ) { - my $html = join('