--- trunk/lib/Frey/HTML.pm	2008/06/29 18:08:50	26
+++ trunk/lib/Frey/HTML.pm	2008/06/29 20:11:27	27
@@ -75,11 +75,12 @@
 
 sub page {
 	my $self = shift;
-	warn "## page $_[0]\n";
+	warn "## page ",dump($_[0],ref($_[1]),$_[2]),"\n";
 	my $page = eval { Template::Declare->show( @_ ) };
 	if ( $@ ) {
 		carp "ERROR: $@";
-		$page = Template::Declare->show( 'error', $@ );
+		$page = Template::Declare->show( 'error', $_[1], "page" . dump($_[0], ref($_[1])) . "\n$@" );
+		warn $page;
 	}
 	return $page;
 }