[Lazarus] Problem with non-ascii chars fpc-3.0.0 vs fpc-3.1.1 under Windows

[zeljko]

Hi,
Just run into problem with fpc-3.0.0, OS Windows-10 64bit, 32bit 
application, lazarus trunk qtlcl and win32 ws both have same problem.

fpc-3.1.1 (18.01.2016) is correct - both running from lazarus or as 
standalone.

fpc-3.0.0 is not correct in both cases (even worse if running from 
lazarus, then GetEnvironmentVariableUTF8 returns garbage instead of
letter Ž.

fpc-2.6.4 - works just fine.


My project doesn't use anything special - pure empty project with one 
form and TMemo - no extra settings like -FcUTF8 or similar, using mode 
delphi ....

Problematic part is line with CACHEDIR= (see screenshoots) which is 
correct with 3.1.1 and it returns correct path from this function:

function GetCacheDir_: String;
{$IFDEF MSWINDOWS}
var
   s: string;
   s1: string;
{$ENDIF}
begin
   {$IFDEF UNIX}
   Result := GetEnvironmentVariable('HOME') + PathDelim + '.holobit';
   {$ELSE}
   // fpc-3.1.1 returns correct values here, while fpc-3.0.0 NOT
   // if environmentvariable contains non-ascii chars
   s := GetEnvironmentVariable('HOMEDRIVE');
   // added s := s+ to fit into mail ...
   s := s + GetEnvironmentVariable('HOMEPATH')+PathDelim+'.holobit';
   SetLength(s1, length(s));
   OEMToAnsiBuff(@S[1], @S1[1], length(S1));
   Result := S1;
   {$ENDIF}
end;

So, my question would be: is it known bug in 3.0.0 and will be fixed in 
3.0.2 or it's already merged in fixes_3_0 or I can sit and cry...or I'm 
missing something ?

Thanks

zeljko

-------------- next part --------------
A non-text attachment was scrubbed...
Name: shot_3_0_0.png
Type: image/png
Size: 9419 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20160427/b2f17c59/attachment-0004.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: shot_3_1_1.png
Type: image/png
Size: 10180 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20160427/b2f17c59/attachment-0005.png>