From 6e7a4fb460a75cd7620ee66c9b9feab5c9708f20 Mon Sep 17 00:00:00 2001
From: Richard Hansen <rhansen@rhansen.org>
Date: Wed, 10 Jul 2024 20:07:03 -0400
Subject: [PATCH] Split subtest into two subtests

This makes it easier to debug failures.
---
 t/get_ip_from_if.pl | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/t/get_ip_from_if.pl b/t/get_ip_from_if.pl
index 6f08e5d..1b1cd35 100644
--- a/t/get_ip_from_if.pl
+++ b/t/get_ip_from_if.pl
@@ -39,7 +39,7 @@ subtest "get_ip_from_interface tests" => sub {
     }
 };
 
-subtest "Get default interface and IP for test system" => sub {
+subtest "Get default interface and IP for test system (IPv4)" => sub {
     my $interface = ddclient::get_default_interface(4);
     if ($interface) {
         isnt($interface, "lo", "Check for loopback 'lo'");
@@ -49,7 +49,10 @@ subtest "Get default interface and IP for test system" => sub {
         is($ip1, $ip2, "Check IPv4 from default interface");
         ok(ddclient::is_ipv4($ip1), "Valid IPv4 from get_ip_from_interface($interface)");
     }
-    $interface = ddclient::get_default_interface(6);
+};
+
+subtest "Get default interface and IP for test system (IPv6)" => sub {
+    my $interface = ddclient::get_default_interface(6);
     if ($interface) {
         isnt($interface, "lo", "Check for loopback 'lo'");
         isnt($interface, "lo0", "Check for loopback 'lo0'");