global-functions: $CharacterReplace: use same condition in loop

This commit is contained in:
Christian Hesse 2019-07-16 12:46:33 +02:00
parent b1b53e3d0d
commit 16f04ee7ee

View file

@ -51,7 +51,7 @@
:return $String;
}
:while ($String ~ $ReplaceFrom) do={
:while ([ :typeof [ :find $String $ReplaceFrom ] ] != "nil") do={
:local Pos [ :find $String $ReplaceFrom ];
:set Return ($Return . [ :pick $String 0 $Pos ] . $ReplaceWith);
:set String [ :pick $String ($Pos + $Len) 999 ];