--- trunk/lib/Frey/Shell/Grep.pm	2008/12/09 20:31:27	765
+++ trunk/lib/Frey/Shell/Grep.pm	2008/12/09 20:31:28	766
@@ -92,7 +92,7 @@
 
 	foreach my $result ( @{ $self->results_as_data } ) {
 
-		warn $self->dump( $result );
+		warn $self->dump( $result ) if $self->debug;
 
 		my $text = $result->{text} || die "no text";