Explorar o código

fcl-js: jswriter: if-else: use bfalse position

git-svn-id: trunk@37240 -
Mattias Gaertner %!s(int64=8) %!d(string=hai) anos
pai
achega
6791127952
Modificáronse 1 ficheiros con 4 adicións e 2 borrados
  1. 4 2
      packages/fcl-js/src/jswriter.pp

+ 4 - 2
packages/fcl-js/src/jswriter.pp

@@ -1100,9 +1100,9 @@ begin
         Writeln('}');
         end;
     end;
-  Writer.CurElement:=El;
   if HasBFalse then
     begin
+    Writer.CurElement:=El.BFalse;
     if not HasBTrue then
       begin
       if C then
@@ -1114,7 +1114,9 @@ begin
       Write(' ');
     Write('else ');
     WriteJS(El.BFalse)
-    end;
+    end
+  else
+    Writer.CurElement:=El;
 end;
 
 procedure TJSWriter.WriteForInStatement(El: TJSForInStatement);