--- trunk/lib/Frey/Dumper.pm	2008/11/16 16:37:04	359
+++ trunk/lib/Frey/Dumper.pm	2008/11/16 16:44:20	360
@@ -28,7 +28,7 @@
 
 	$out .= qq|<li${title}>|;
 	my $mark = $key || '&diams;';
-	$out .= $ref && $ref !~ m{^(ARRAY|HASH)$} ? qq|<a href="/$ref" target="blessed" title="$ref">$mark</a>| : $key;
+	$out .= $ref && $ref !~ m{^(ARRAY|HASH)$} ? qq|<a href="/$ref" class="blessed" target="blessed" title="$ref">$mark</a>| : $key;
 
 	if ( ref($data) eq 'ARRAY' ) {
 		$out .= " &darr;</li>" if $key;
@@ -42,8 +42,8 @@
 		$out .= "</ul>\n";
 	} else {
 		$out .= " &rarr; " if $key;
-		if ( $data =~ m{<(\w+)>.+</\1>} ) {
-			$out .= qq|<div style="background: #eee; color: #000">$data</div></li>|;
+		if ( $data =~ m{<(\w+).*>.+</\1>} ) {
+			$out .= qq|<div style="background: #eee; color: #000" title="HTML">$data</div></li>|;
 		} else {
 			$out .= "<span>" . $self->html_dump( $data ) . "</span></li>";
 		}