浏览代码

Error fixed in HostLang.ParseLang

Alexander Shiryaev 12 年之前
父节点
当前提交
5e323c868d
共有 2 个文件被更改,包括 2 次插入2 次删除
  1. 二进制
      BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.odc
  2. 2 2
      BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.txt

二进制
BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.odc


+ 2 - 2
BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.txt

@@ -64,11 +64,11 @@ MODULE HostLang;
 						country[j] := 0X;
 						INC(i);
 						j := 0;
-						WHILE IsValidEncChar(env[i]) & (j < LEN(enc)) DO
+						WHILE IsValidEncChar(env[i]) & (j < LEN(enc) - 1) DO
 							enc[j] := env[i];
 							INC(j); INC(i)
 						END;
-						IF j < LEN(enc) - 1 THEN
+						IF (env[i] = 0X) & (j < LEN(enc)) THEN
 							enc[j] := 0X
 						ELSE Default
 						END