Env: GetLang uses Platform

src/Env.Mod

@@ -51,14 +51,8 @@ BEGIN
 END GetAppDir;
 
 PROCEDURE GetLang*(VAR s: ARRAY OF CHAR);
-BEGIN
-  GetByName('LANGUAGE', s);
-  IF s = '' THEN
-    GetByName('LC_ALL', s);
-    IF s = '' THEN
-      GetByName('LANG', s)
-    END
-  END
+VAR z: ARRAY 256 OF SHORTCHAR;
+BEGIN Platform.GetLang(z); Utf8.Decode(z, s)
 END GetLang;
 
 BEGIN