From c14ed7ca0d62e2b5235bc4ab2956e243ba5e5a3f Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Mon, 11 May 2026 15:40:16 +0200
Subject: [PATCH] global-functions: $CleanName: use :continue in loop

---
 global-functions.rsc | 14 ++++----------
 1 file changed, 4 insertions(+), 10 deletions(-)

diff --git a/global-functions.rsc b/global-functions.rsc
index 5bdd7679..2193d456 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -306,17 +306,11 @@
   :for I from=0 to=([ :len $Input ] - 1) do={
     :local Char [ :pick $Input $I ];
     :if ([ :typeof [ :find "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789" $Char ] ] = "nil") do={
-      :do {
-        :if ([ :len $Return ] = 0) do={
-          :error true;
-        }
-        :if ([ :pick $Return ([ :len $Return ] - 1) ] = "-") do={
-          :error true;
-        }
-        :set Char "-";
-      } on-error={
-        :set Char "";
+      :if ([ :len $Return ] = 0 || \
+           [ :pick $Return ([ :len $Return ] - 1) ] = "-") do={
+        :continue;
       }
+      :set Char "-";
     }
     :set Return ($Return . $Char);
   }