From f869bb659fbd6c06b773ffe4a238509146dd4553 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Wed, 6 May 2026 09:21:44 +0200
Subject: [PATCH] global-functions: $IsDNSResolving: check with :retry

---
 global-functions.rsc | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/global-functions.rsc b/global-functions.rsc
index f2b13113..fb76047e 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -812,13 +812,12 @@
 # check if DNS is resolving
 :set IsDNSResolving do={
   :do {
-    :resolve "low-ttl.eworm.de";
-    :return true;
-  } on-error={ }
-
-  :do {
-    :resolve "low-ttl.eworm.net";
-    :return true;
+    :local I 1;
+    :retry {
+      :set I ($I ^ 1);
+      :resolve ("low-ttl.eworm." . ({ "de"; "net" }->$I));
+      :return true;
+    } delay=50ms max=6;
   } on-error={ }
 
   :return false;