mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-04 01:00:15 +02:00
IDE: fpc info: fixed env vars
git-svn-id: trunk@29883 -
This commit is contained in:
parent
6b248eb794
commit
bfd14cda9b
@ -97,7 +97,7 @@ var
|
||||
begin
|
||||
sl.Add('Environment variables:');
|
||||
for i:=0 to GetEnvironmentVariableCount-1 do
|
||||
sl.Add(GetEnvironmentStringUTF8(i)+'='+GetEnvironmentVariableUTF8(GetEnvironmentStringUTF8(i)));
|
||||
sl.Add(GetEnvironmentStringUTF8(i));
|
||||
sl.Add('');
|
||||
end;
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user