--- trunk/lib/Frey/Web.pm	2008/11/18 16:54:10	418
+++ trunk/lib/Frey/Web.pm	2008/11/18 17:41:41	422
@@ -136,7 +136,11 @@
 
 	my $status_line = '';
 	foreach my $part ( @{ $self->status } ) {
-		confess "part not hash ",dump( $part ) unless ref($part) eq 'HASH';
+		if ( ref($part) ne 'HASH' ) {
+			warn "part not hash ",dump( $part ) ;
+			#$self->status( $part );
+			next;
+		}
 		foreach my $name ( keys %$part ) {
 			my $content = $part->{$name};
 			if ( ref($content) ) {