--- trunk/lib/SourceSnoop.pm	2008/09/13 16:59:07	188
+++ trunk/lib/SourceSnoop.pm	2008/10/28 17:05:11	192
@@ -5,6 +5,8 @@
 use lib '/rest/cvs/vci/lib'; # FIXME
 use VCI;
 
+use HTML::Entities qw/encode_entities/;
+
 extends 'Frey';
 with 'Frey::Web';
 
@@ -22,10 +24,15 @@
 	} else {
 		$t = dump( $o );
 	}
-	return "<pre>$t</pre>";
+	return '<hr><pre>' . encode_entities($t) . '</pre><hr>';
 }
 
-sub html {
+use MooseX::Method;
+
+method html => positional(
+	{ isa => 'Continuity::RequestHolder', required => 1 },
+) => sub {
+#sub html {
 	my ( $self, $request ) = @_;
 
 	my %param = $request->params;
@@ -60,20 +67,23 @@
 		return "<div class=\"$class\">$text</div>";
 	}
 
+	my $diff = $commit->as_diff;
+
 	my $body =
 		'<h1>Commit</h1>' .
 		div( 'revision', $commit->revision ) .
 		div( 'commiter', $commit->committer ) .
 		div( 'date',     $commit->time->iso8601 ) .
 		div( 'message',  $commit->message ) .
-		'<pre>' . $commit->as_diff->raw . '</pre>';
+		'<pre>' . encode_entities( $diff->raw ) . '</pre>' .
+		pre_dump( $diff );
 
 	$request->print( $self->page(
 		title => $path . '/' . $project->name,
 		body => $body,
 	) );
 	$request->next;
-}
+};
 
 warn "## VCI loaded";