[Lngcompiler-commits] CVS: lngcompiler LngForm.pas,1.20,1.21

[Maxim M. <max...@us...>]

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;