michael пре 5 година
родитељ
комит
43a68f985a
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      packages/rtl/class2pas.pas

+ 1 - 1
packages/rtl/class2pas.pas

@@ -59,7 +59,7 @@ var
 begin
 begin
   T:=aPascalName+' = Class external name '''+aJSName+'''';
   T:=aPascalName+' = Class external name '''+aJSName+'''';
   if aAncestor<>'' then
   if aAncestor<>'' then
-    T:=T+'('+aAncestor+')';
+    T:=T+' ('+aAncestor+')';
   aDecl.Add(T);
   aDecl.Add(T);
   aDecl.Add('Public');
   aDecl.Add('Public');
   p:=TJSArray.new;
   p:=TJSArray.new;