Преглед на файлове

* Numeric chars allowed in identifier, no need to escape

Michaël Van Canneyt преди 3 години
родител
ревизия
2b99abdd4d
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/fcl-css/src/fpcsstree.pp

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

@@ -445,7 +445,7 @@ begin
   While iIn<=Length(S) do
     begin
     C:=S[iIn];
-    If Not (C in ['a'..'z','A'..'Z','_','-']) then
+    If Not (C in ['a'..'z','A'..'Z','_','-','0'..'9']) then
       begin
       inc(iOut);
       Result[iOut]:='\';