Mercurial > hg > nginx-tests

changeset 67:5d16f380cd75

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Tests: don't output in/out unless TEST_NGINX_VERBOSE set.
author Maxim Dounin <mdounin@mdounin.ru>
date Tue, 27 Jan 2009 01:32:47 +0300
parents b4f1e64882b7
children 5f56040c39df
files lib/Test/Nginx.pm
diffstat 1 files changed, 2 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- 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;