--- trunk/lib/Frey/Dumper.pm	2008/11/06 21:32:10	329
+++ trunk/lib/Frey/Dumper.pm	2008/11/16 15:19:54	355
@@ -30,7 +30,7 @@
 		$out .= qq|<ol${title} start=0>\n|;
 		$out .= $self->unroll($_,ref($_)) foreach @$data;
 		$out .= "</ol>\n";
-	} elsif ( ref($data) ) {
+	} elsif ( ref($data) eq 'HASH' ) {
 		$out .= "<li>$key &darr;</li>" if $key;
 		$out .= qq|<ul${title}>\n|;
 		$out .= $self->unroll($data->{$_},ref($data->{$_}),$_) foreach keys %$data;
@@ -38,7 +38,11 @@
 	} else {
 		$out .= qq|<li${title}>|;
 		$out .= "$key &rarr; " if $key;
-		$out .= "<span>" . $self->html_dump( $data ) . "</span></li>";
+		if ( $data =~ m{<(\w+)>.+</\1>} ) {
+			$out .= qq|<div style="background: #eee; color: #000">$data</div></li>|;
+		} else {
+			$out .= "<span>" . $self->html_dump( $data ) . "</span></li>";
+		}
 	}
 	return $out;
 }