Update of /cvsroot/lngcompiler/lngcompiler
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10019
Modified Files:
LngForm.pas
Log Message:
was a bug in grab
Index: LngForm.pas
===================================================================
RCS file: /cvsroot/lngcompiler/lngcompiler/LngForm.pas,v
retrieving revision 1.20
retrieving revision 1.21
diff -C2 -d -r1.20 -r1.21
*** LngForm.pas 28 Feb 2005 17:26:51 -0000 1.20
--- LngForm.pas 13 Mar 2005 20:11:53 -0000 1.21
***************
*** 541,545 ****
begin
! LL := Length(AName);
Result := 0;
E := False;
--- 541,545 ----
begin
! LL := Length(AName)+1;
Result := 0;
E := False;
|