Kaynağa Gözat

fcl-css: clean up

mattias 4 ay önce
ebeveyn
işleme
ffc7a00b98

+ 1 - 1
packages/fcl-css/src/fpcssparser.pp

@@ -1256,7 +1256,7 @@ function TCSSParser.ParseSelector: TCSSElement;
 
 var
   ok, OldReturnWhiteSpace: Boolean;
-  Bin, PseudoBin: TCSSBinaryElement;
+  Bin: TCSSBinaryElement;
   El, Sub: TCSSElement;
   List: TCSSListElement;
 begin

+ 0 - 1
packages/fcl-css/src/fpcssresolver.pas

@@ -1382,7 +1382,6 @@ function TCSSResolver.SelectorBinaryMatches(aBinary: TCSSBinaryElement;
 var
   aParent, Sibling: ICSSNode;
   aSpecificity: TCSSSpecificity;
-  PseudoEl: TCSSElement;
 begin
   if OnlySpecificity then
   begin