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;