[lazarus] FindInFiles.diff

Mattias Gaertner nc-gaertnma at netcologne.de
Tue Aug 5 02:59:52 EDT 2003


On Tue, 5 Aug 2003 00:56:40 +0200
Vincent Snijders <vslist at zonnet.nl> wrote:

> > > I think that the FindClose should be outside the if then block in de
> > > FindMatchingFiles procedure in ideproc. What happens if FindFirst
> > > return 0, for example when there are no *.inc files in a directory.
> > > FindClose is not called. This is also true for the recursive find,
> > > but there FindFirst (almost?) never return zero, for a directory
> > > contains the . file. Notice that the check if a file is a directory
> > >       if ((faDirectory and FileInfo.Attr)>0) then (line 2104)
> > > is only done for the first file found. Maybe this should be put
> > > inside the repeat until loop.
> > 
> > Yep.
> > 
> > 
> > Mattias
> Attached the patch to do this.

Applied.


Mattias






More information about the Lazarus mailing list