--- trunk/lib/SourceSnoop.pm 2008/09/14 00:49:57 191 +++ trunk/lib/SourceSnoop.pm 2008/10/28 17:05:11 192 @@ -27,7 +27,12 @@ return '
' . encode_entities($t) . '

'; } -sub html { +use MooseX::Method; + +method html => positional( + { isa => 'Continuity::RequestHolder', required => 1 }, +) => sub { +#sub html { my ( $self, $request ) = @_; my %param = $request->params; @@ -78,7 +83,7 @@ body => $body, ) ); $request->next; -} +}; warn "## VCI loaded";