mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-31 09:30:17 +02:00
+ Fix for ansistring conversion
This commit is contained in:
parent
b3f5bf1766
commit
186749643c
@ -10,7 +10,7 @@ begin
|
|||||||
// Linux version returns pchar.
|
// Linux version returns pchar.
|
||||||
p:=linux.getenv(EnvVar);
|
p:=linux.getenv(EnvVar);
|
||||||
if P<>nil then
|
if P<>nil then
|
||||||
getenv:=ansistring(p)
|
getenv:=strpas(p)
|
||||||
else
|
else
|
||||||
getenv:='';
|
getenv:='';
|
||||||
end;
|
end;
|
||||||
|
Loading…
Reference in New Issue
Block a user