Added UTF-8 string support to IfThen scripting function

TES5Edit · Nov 27, 2017 · 7d1707c · 7d1707c
1 parent 7048e9e
commit 7d1707c
Showing 1 changed file with 1 addition and 0 deletions.
diff --git a/wbScriptAdapterMisc.pas b/wbScriptAdapterMisc.pas
@@ -79,6 +79,7 @@ procedure JvInterpreter_IfThen(var Value: Variant; Args: TJvInterpreterArgs);
   if VarType(Args.Values[1]) = VarType(Args.Values[2]) then
     case VarType(Args.Values[1]) of
       varString  : Value := StrUtils.IfThen(Boolean(Args.Values[0]), String(Args.Values[1]), String(Args.Values[2]));
+      varUString : Value := StrUtils.IfThen(Boolean(Args.Values[0]), UTF8String(Args.Values[1]), UTF8String(Args.Values[2]));
       varInteger : Value := Math.IfThen(Boolean(Args.Values[0]), Integer(Args.Values[1]), Integer(Args.Values[2]));
       varSingle  : Value := Math.IfThen(Boolean(Args.Values[0]), Single(Args.Values[1]), Single(Args.Values[2]));
       varDouble  : Value := Math.IfThen(Boolean(Args.Values[0]), Double(Args.Values[1]), Double(Args.Values[2]));