Jelajahi Sumber

error fixed in HostLang.ParseLang

Alexander Shiryaev 12 tahun lalu
induk
melakukan
89b7c28cb7
2 mengubah file dengan 2 tambahan dan 2 penghapusan
  1. TEMPAT SAMPAH
      BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.odc
  2. 2 2
      BlackBox/_LinuxOpenBSD_/Host/Mod/Lang.txt

TEMPAT SAMPAH
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