* fixed compile error in getenv

This commit is contained in:
armin 2005-01-11 11:32:33 +00:00
parent cc30f344ea
commit da6541c108

View File

@ -479,7 +479,7 @@ begin
if GetEnv <> '' then GetEnv := GetEnv + ';';
GetEnv := GetEnv + envvar0;
GetEnv := GetEnv + strpas(envvar0);
inc (i);
@ -519,7 +519,10 @@ End;
end.
{
$Log$
Revision 1.13 2004-12-07 11:03:44 armin
Revision 1.14 2005-01-11 11:32:33 armin
* fixed compile error in getenv
Revision 1.13 2004/12/07 11:03:44 armin
* fixed typo's
Revision 1.12 2004/12/05 16:44:43 hajny