# HG changeset patch
# User Maxim Dounin <mdounin@mdounin.ru>
# Date 1233009167 -10800
# Node ID 5d16f380cd75b7f4445f88a66b5737089c76b7b6
# Parent  b4f1e64882b794b4c7f6de5cbaa71c42863950c7
Tests: don't output in/out unless TEST_NGINX_VERBOSE set.

diff --git a/lib/Test/Nginx.pm b/lib/Test/Nginx.pm
--- a/lib/Test/Nginx.pm
+++ b/lib/Test/Nginx.pm
@@ -209,6 +209,7 @@ sub testdir() {
 ###############################################################################
 
 sub log_out {
+	return unless $ENV{TEST_NGINX_VERBOSE};
 	my ($msg) = @_;
 	$msg =~ s/^/# >> /gm;
 	$msg .= "\n" unless $msg =~ /\n\Z/;
@@ -216,6 +217,7 @@ sub log_out {
 }
 
 sub log_in {
+	return unless $ENV{TEST_NGINX_VERBOSE};
 	my ($msg) = @_;
 	$msg =~ s/^/# << /gm;
 	$msg =~ s/([^\x20-\x7e])/sprintf('\\x%02x', ord($1)) . (($1 eq "\n") ? "\n" : '')/gmxe;