From 2ccdd3b19ecda9e0b5ebbf076f9a4cad9a9063b3 Mon Sep 17 00:00:00 2001 From: Richard Hansen Date: Thu, 5 Sep 2024 19:03:10 -0400 Subject: [PATCH] tests: Delete obsolete debugging comments All log output goes to stderr, so turning on `debug` or `verbose` will not interfere with TAP. A better way to debug is to add the following to whatever scope you think is appropriate: local $ddclient::globals{debug} = 1; local $ddclient::globals{verbose} = 1; --- t/get_ip_from_if.pl | 5 ----- t/geturl_connectivity.pl | 5 ----- 2 files changed, 10 deletions(-) diff --git a/t/get_ip_from_if.pl b/t/get_ip_from_if.pl index 15c66a1..1f26c48 100644 --- a/t/get_ip_from_if.pl +++ b/t/get_ip_from_if.pl @@ -3,11 +3,6 @@ use ddclient::t; SKIP: { eval { require Test::Warnings; } or skip($@, 1); } eval { require 'ddclient'; } or BAIL_OUT($@); -# To aid in debugging, uncomment the following lines. (They are normally left commented to avoid -# accidentally interfering with the Test Anything Protocol messages written by Test::More.) -#STDOUT->autoflush(1); -#$ddclient::globals{'debug'} = 1; - subtest "get_default_interface tests" => sub { for my $sample (@ddclient::t::routing_samples) { if (defined($sample->{want_ipv4_if})) { diff --git a/t/geturl_connectivity.pl b/t/geturl_connectivity.pl index 8c1cb99..d7481b4 100644 --- a/t/geturl_connectivity.pl +++ b/t/geturl_connectivity.pl @@ -18,11 +18,6 @@ my $http_daemon_supports_ipv6 = eval { HTTP::Daemon->VERSION(6.12); }; -# To aid in debugging, uncomment the following lines. (They are normally left commented to avoid -# accidentally interfering with the Test Anything Protocol messages written by Test::More.) -#STDOUT->autoflush(1); -#$ddclient::globals{'verbose'} = 1; - my $certdir = "$ENV{abs_top_srcdir}/t/lib/ddclient/Test/Fake/HTTPD"; $ddclient::globals{'ssl_ca_file'} = "$certdir/dummy-ca-cert.pem";