--- trunk/lib/Frey/Web.pm	2008/11/18 00:30:29	389
+++ trunk/lib/Frey/Web.pm	2008/11/18 00:55:23	392
@@ -24,7 +24,7 @@
 	] },
 );
 
-has 'urequest_url' => (
+has 'request_url' => (
 	is => 'rw',
 	isa => 'Uri', coerce => 1,
 	default => '/',
@@ -125,8 +125,14 @@
 	my $status_line = '';
 	foreach my $part ( @{ $self->status } ) {
 		foreach my $name ( keys %$part ) {
-			warn "### part [$name] = ", length( $part->{name} ), " bytes" if $self->debug;
-			$status_line .= qq|<span class="frey-popup">$name<span>| . $part->{$name} . qq|</span></span>|;
+			my $content = $part->{$name};
+			if ( ref($content) ) {
+				$content = '<code>' . dump( $content ) . '</code>';
+			} else {
+				$content = qq|<span>$content</span>|;
+			}
+			warn "### part [$name] = ", length( $content ), " bytes" if $self->debug;
+			$status_line .= qq|<span class="frey-popup">$name $content</span>|;
 		}
 	}
 
@@ -141,7 +147,7 @@
 		qq|
 		<div class="frey-status-line">
 			<a href="/">Frey</a> $Frey::VERSION
-			<a href="?reload=$reload_counter"><code>| . $self->urequest_url . qq|</code></a>
+			<a href="?reload=$reload_counter"><code>| . $self->request_url . qq|</code></a>
 			$status_line
 		</div>
 	    </body></html>