Sfoglia il codice sorgente

fcl-db: cosmetic: layout

git-svn-id: trunk@27661 -
reiniero 11 anni fa
parent
commit
af2bc84a9a
1 ha cambiato i file con 2 aggiunte e 1 eliminazioni
  1. 2 1
      packages/fcl-db/src/base/sqlscript.pp

+ 2 - 1
packages/fcl-db/src/base/sqlscript.pp

@@ -459,7 +459,8 @@ begin
     pnt:=FindNextSeparator([FTerminator, '/*', '"', '''']);
     if (pnt=FTerminator) then
       begin
-      if pnt='' then begin
+      if pnt='' then
+      begin
         // Empty line, only e.g. a ; present:
         FEmitLine:=False;
         end