* fix web bug report 2099

This commit is contained in:
pierre 2002-09-02 10:33:37 +00:00
parent a9f7d35c69
commit b5ce52f87d

View File

@ -5523,7 +5523,7 @@ begin
DelChar; DelChar;
for Y:=0 to CodeLines^.Count-1 do for Y:=0 to CodeLines^.Count-1 do
begin begin
Line:=CodeLines^.At(Y)^; Line:=GetStr(CodeLines^.At(Y));
CanJump:=false; CanJump:=false;
if (Y>0) then if (Y>0) then
begin begin
@ -7104,7 +7104,10 @@ end;
END. END.
{ {
$Log$ $Log$
Revision 1.24 2002-08-26 14:00:48 pierre Revision 1.25 2002-09-02 10:33:37 pierre
* fix web bug report 2099
Revision 1.24 2002/08/26 14:00:48 pierre
* fix for bug report 2025 * fix for bug report 2025
Revision 1.23 2002/08/26 13:01:38 pierre Revision 1.23 2002/08/26 13:01:38 pierre