From 0ceedab5db11314ed0e275f2129d602ba20e81d0 Mon Sep 17 00:00:00 2001
From: Christian Hesse <mail@eworm.de>
Date: Tue, 6 Jan 2026 13:43:11 +0100
Subject: [PATCH] global-functions: $CharacterMultiply: return early on length
 zero...

... as :for loop counts backwards and would return two
character otherwise.
---
 global-functions.rsc | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/global-functions.rsc b/global-functions.rsc
index d99e216f..3b5db905 100644
--- a/global-functions.rsc
+++ b/global-functions.rsc
@@ -243,6 +243,10 @@
   :local Str [ :tostr $1 ];
   :local Num [ :tonum $2 ];
 
+  :if ($Num = 0) do={
+    :return "";
+  }
+
   :local Return "";
   :for I from=1 to=$Num do={
     :set Return ($Return . $Str);