paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-14 08:51:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Remove debug statement

Browse Source
This commit is contained in:
Michaël Van Canneyt 2022-04-02 10:14:19 +02:00
parent 2b99abdd4d
commit aedb6dbacd
1 changed files with 0 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
packages/fcl-css/src/fpcsstree.pp
View File

@ -757,7 +757,6 @@ begin
I:=1; I:=1;
if (Length(Value)>2) and (Value[2]=':') then if (Length(Value)>2) and (Value[2]=':') then
I:=2; I:=2;
Writeln('Value ',Value, ' -> ',I);
Result:=Copy(Value,1,I)+StringToIdentifier(Copy(Value,I+1,Length(Value)-I)); Result:=Copy(Value,1,I)+StringToIdentifier(Copy(Value,I+1,Length(Value)-I));
end; end;