From 29450f9921829f2b8a814c342ca3c12830713ed7 Mon Sep 17 00:00:00 2001
From: David Dick <ddick@cpan.org>
Date: Tue, 27 Feb 2024 21:55:03 +1100
Subject: [PATCH] stopping an infinite loop in OpenBSD

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

diff --git a/t/04-proxy.t b/t/04-proxy.t
index 8e52ce2..492eee2 100644
--- a/t/04-proxy.t
+++ b/t/04-proxy.t
@@ -95,14 +95,14 @@ SKIP: {
 		} or do {
 			chomp $@;
 			diag("Did not load webpage:$@");
-			redo AUTH_LOOP;
+			next AUTH_LOOP;
 		};
 		my $strip = $firefox->strip();
 		TODO: {
 			local $TODO = $ENV{FIREFOX_NO_WEB_AUTH} ? q[] : "Firefox can have race conditions for basic web auth";
 			ok($strip eq $nginx->content(), "Successfully retrieved web page through ssh and web proxies:$strip:");
 			if ($strip ne $nginx->content()) {
-				redo AUTH_LOOP;
+				next AUTH_LOOP;
 			}
 		}
 		ok($firefox->quit() == 0, "Firefox closed successfully");