--- trunk/lib/Frey/Web.pm	2008/11/28 16:35:59	590
+++ trunk/lib/Frey/Web.pm	2008/11/28 16:39:37	591
@@ -98,7 +98,7 @@
 
 	$content =~ s{<span>(<code>[^<]+</code>)</span>}{$1} && $self->TODO("code wrapped in span");
 
-	warn "## $type [$name] = ", length( $content ), " bytes" if $self->debug;
+	warn "## $type [$name] = ", length( $content ), " bytes"; # if $self->debug; # FIXME
 
 	if ( $name =~ m{::} && $name !~ $re_html ) {
 		return qq|<a class="frey-$type" target="$name" href="/$name">$name $content</a>\n|;
@@ -216,7 +216,11 @@
 	$url =~ s{\?reload=\d+}{};
 
 	my $body = $a->{body};
-	$body ||= $self->as_markup if $self->can('as_markup');
+	if ( ! $body ) {
+		my $run = $a->{run} || 'as_markup';
+		warn "# no body, invoke $self->$run";
+		$body = $self->$run;
+	}
 	if ( $self->content_type !~ m{html} ) {
 		warn "# return only $self body ", $self->content_type;
 		return $body
@@ -302,6 +306,8 @@
 sub editor_links {
 	my ( $self, $error ) = @_;
 
+#	$error =~ s[(bless\({\s+.+?\s+},\s+)("[^"]+")(\) at)][<span class="frey-dropdown">$1<code>$2</code>$3</span>]gs; # FIXME insert bless hiding back
+
 	$error =~ s{at\s+(\S+)\s+line\s+(\d+)}
 		{at <a target="editor" href="/editor+$1+$2">$1</a> line $2}gsm;
 
@@ -556,7 +562,7 @@
 		push @backtrace,
 			qq|via $package at $path line $line|;
 	}
-	warn "# backtrace: ", dump( @backtrace ) if @backtrace;
+	#warn "# backtrace: ", dump( @backtrace ) if @backtrace;
 	return @backtrace;
 }