--- trunk/lib/Frey/Pipe.pm 2008/11/18 02:17:06 401 +++ trunk/lib/Frey/Pipe.pm 2008/11/18 14:15:45 414 @@ -52,10 +52,10 @@ } my ( $html, $default ) = Frey::Action->new( class => $class, params => $params )->params_form; - warn "$class need more params than ",dump( $default ) if $html; # FIXME replace with query + warn "$class need more params than ",dump( $default ) if $html && $self->debug; # FIXME replace with query my $code = '$result = ' . $class . '->new' . dump( %$default ) . '->' . $method . '();'; - warn "# pipe $part -> $code"; + warn "# pipe $part -> $code" if $self->debug; my $result; eval $code; die $@ if $@;