From b46d064f5538bb08eba9b637ba7ea247f1ff3949 Mon Sep 17 00:00:00 2001
From: Richard Hansen <rhansen@rhansen.org>
Date: Fri, 24 Jul 2020 15:18:34 -0400
Subject: [PATCH] Don't show `-noipv6` when `ipv6_opt` is false

---
 t/geturl_connectivity.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/t/geturl_connectivity.pl b/t/geturl_connectivity.pl
index eef8e19..71db62a 100644
--- a/t/geturl_connectivity.pl
+++ b/t/geturl_connectivity.pl
@@ -81,8 +81,8 @@ for my $tc (@test_cases) {
             if $tc->{server_ipv} eq '6' && !$http_daemon_supports_ipv6;
         skip("HTTP::Daemon::SSL not available", 1) if $tc->{ssl} && !$has_http_daemon_ssl;
         my $uri = $httpd{$tc->{server_ipv}}{$tc->{ssl} ? 'https' : 'http'}->endpoint();
-        my $name = sprintf("IPv%s client to %s (-%sipv6)",
-                           $tc->{client_ipv} || '*', $uri, $tc->{ipv6_opt} ? '' : 'no');
+        my $name = sprintf("IPv%s client to %s%s",
+                           $tc->{client_ipv} || '*', $uri, $tc->{ipv6_opt} ? ' (-ipv6)' : '');
         $ddclient::globals{'ipv6'} = $tc->{ipv6_opt};
         my $got = ddclient::geturl(url => $uri, ipversion => $tc->{client_ipv});
         isnt($got // '', '', $name);