[lazarus] build error on win32

[Mattias Gaertner]

On Mon, 08 Jul 2002 11:34:43 +0100
Martyn Ranyard <ranyardm at lineone.net> wrote:

> At 11:17 AM 7/8/02 +0100, Martyn Ranyard wrote:
> >   That got me past that one, but then I reran make and the following 
> > happened :
> >
> >Compiling ideprocs.pp
> >ideprocs.pp(165,5) Note: Local variable ATEXT not used
> >ideprocs.pp(245,31) Hint: Parameter AFILENAME not used
> >ideprocs.pp(624,11) Error: Identifier not found GETENV
> >ideprocs.pp(629,13) Error: Identifier not found GETENV
> >ideprocs.pp(632,15) Error: Identifier not found GETENV
> >ideprocs.pp(746) Fatal: There were 3 errors compiling module, stopping
> >make[1]: *** [lazarus.exe] Error 1
> >make[1]: Leaving directory `C:/lazarus'
> >make: *** [ide] Error 2
> >
> >   Now I'd rather not wind back ideprocs.pp to get the unit working, and 
> > I'll start grepping for GETENV, but in the meantime, anyone know why this 
> > might be?
> 
> Okay, I solved it myself, GetEnv is in unit DOS - when I added that, The 
> FindFirst Reference in DirectoryExists refused it's parameters.
> 
> So I changed the reference of it and the FindClose to Sysutils.FindFirst 
> and Sysutils.FindClose.
> 
> here's a patch (attached).

Thx.
I have applied it. Although not tested (no windows at the moment).


Mattias