瀏覽代碼

fcl-db: cosmetic: layout

git-svn-id: trunk@27661 -
reiniero 11 年之前
父節點
當前提交
af2bc84a9a
共有 1 個文件被更改,包括 2 次插入1 次删除
  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