--- trunk/lib/Frey/Designer.pm 2008/11/01 00:58:24 224 +++ trunk/lib/Frey/Designer.pm 2008/11/05 22:11:17 319 @@ -79,8 +79,8 @@ return $body; } -sub request { - my ( $self, $req ) = @_; +sub markup { + my ( $self ) = @_; my $body = $self->get_page; @@ -115,7 +115,6 @@ warn "<< ", $self->uri, " ", -s $self->path, - " ", $req->params ? dump( $req->params ) : '', "\n"; =for later @@ -139,7 +138,7 @@ warn $body; - $req->print( $self->page( title => $self->uri, body => $body ) ); + return $self->page( title => $self->uri, body => $body ); } 1;