--- trunk/t/04-frey-pipe.t	2008/11/19 19:28:09	467
+++ trunk/t/04-frey-pipe.t	2008/11/26 21:30:01	548
@@ -24,7 +24,7 @@
 foreach my $pipe ( sort keys %$pipes ) {
 	my $real_pipe = $pipe;
 	$real_pipe =~ s{^\d+\s+}{};
-	ok( my $o = Frey::Pipe->new( pipe => $real_pipe ), "pipe $pipe" );
+	ok( my $o = Frey::Pipe->new( pipe => $real_pipe, debug => $debug ), "pipe $pipe" );
 	ok( my $markup = $o->as_markup, 'markup' );
 	diag dump( $markup ) if $debug;
 	like( $markup, $pipes->{$pipe}, 'validate' );