--- trunk/lib/Frey/Server.pm 2008/11/20 13:57:38 477 +++ trunk/lib/Frey/Server.pm 2008/11/25 14:58:59 518 @@ -112,6 +112,7 @@ # shared run params my $run = { request_url => $req->request->url, + debug => 1, }; if ( @@ -134,6 +135,7 @@ my $class = rest2class $1; warn "# run $path -> $class $2"; $run->{format} = $3 if $3; + $params{request_url} = $req->request->url; $f = Frey::Run->new( class => $class, params => \%params, run => $2, %$run ); } elsif ( $path =~ m{/([^/]+)/?$} @@ -146,7 +148,8 @@ } if ( $f ) { - push @{ $f->status }, { req => $req }; + $f->add_status( { req => $req } ); + warn "## status ", dump( map { keys %$_ } @{ $f->status } ); $req->print( $f->html ); } else { warn "# can't call request on nothing!";