Sudoku: SaveSudokuToFile: don't write trailing empty line.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7235 8e941d3f-bd1b-0410-a28a-d453659cc2b4
2020-01-05 10:41:57 +00:00
parent f81cdec6d9
commit b922ed417d
1 changed files with 1 additions and 0 deletions
--- a/applications/sudoku/sudokumain.pas
+++ b/applications/sudoku/sudokumain.pas
@ -262,6 +262,7 @@ var
 begin
  SL := TStringList.Create;
  try
+    SL.SkipLastLineBreak := True;
    GridToLines(SL);
    {$if fpc_fullversion >= 30200}
    SL.WriteBom := False;