paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-04 16:30:16 +02:00
Code Issues Packages Projects Releases Wiki Activity

fcl-css: fixed compile

Browse Source
This commit is contained in:
mattias 2022-09-14 21:49:39 +02:00
parent 9156d10257
commit 6a0e8feeba
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
packages/fcl-css/src/fpcssresolver.pas
View File

@ -609,14 +609,14 @@ end;
function TCSSResolver.SelectorArrayMatches(anArray: TCSSArrayElement;
const TestNode: TCSSNode): TCSSSpecifity;
var
{$IFDEF VerboseCSSResolver}
i: integer;
{$ENDIF}
El: TCSSElement;
C: TClass;
AttrID: TCSSNumericalID;
{$IFDEF VerboseCSSResolver}
i: integer;
aValue: TCSSString;
OldStringComparison: TCSSResStringComparison;
{$ENDIF}
aValue: TCSSString;
begin
Result:=CSSSpecifityInvalid;
if anArray.Prefix<>nil then