From 77d74614cb3910de62bbd8651f1a4f81c39e9e5a Mon Sep 17 00:00:00 2001
From: reiniero <reiniero@idefix.freepascal.org>
Date: Mon, 24 Mar 2014 12:24:39 +0000
Subject: [PATCH] fcl-db: cosmetic

git-svn-id: trunk@27259 -
---
 packages/fcl-db/src/base/dataset.inc   | 2 +-
 packages/fcl-db/src/base/fields.inc    | 4 ++--
 packages/fcl-db/tests/database.ini.txt | 2 +-
 3 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/packages/fcl-db/src/base/dataset.inc b/packages/fcl-db/src/base/dataset.inc
index 3f39a6e175..395c310399 100644
--- a/packages/fcl-db/src/base/dataset.inc
+++ b/packages/fcl-db/src/base/dataset.inc
@@ -1207,7 +1207,7 @@ begin
     inc(FBufferCount); // Cause FBuffers[FBufferCount] is already allocated
     FillChar(FBuffers[FBufferCount],(Value+1-FBufferCount)*SizeOf(TRecordBuffer),#0);
 {$ifdef dsdebug}
-    Writeln ('   Filled memory :');
+    Writeln ('   Filled memory');
 {$endif}
     Try
 {$ifdef dsdebug}
diff --git a/packages/fcl-db/src/base/fields.inc b/packages/fcl-db/src/base/fields.inc
index 3cee326299..42dd11fb36 100644
--- a/packages/fcl-db/src/base/fields.inc
+++ b/packages/fcl-db/src/base/fields.inc
@@ -100,10 +100,10 @@ begin
     Result.SetFieldType(DataType);
     Result.FReadOnly:= (faReadOnly in Attributes);
 {$ifdef dsdebug}
-    Writeln ('TFieldDef.CReateField : Trying to set dataset');
+    Writeln ('TFieldDef.CreateField : Trying to set dataset');
 {$endif dsdebug}
 {$ifdef dsdebug}
-    Writeln ('TFieldDef.CReateField : Result Fieldno : ',Result.FieldNo,' Self : ',FieldNo);
+    Writeln ('TFieldDef.CreateField : Result Fieldno : ',Result.FieldNo,' Self : ',FieldNo);
 {$endif dsdebug}
     Result.Dataset:=TFieldDefs(Collection).Dataset;
     If (Result is TFloatField) then
diff --git a/packages/fcl-db/tests/database.ini.txt b/packages/fcl-db/tests/database.ini.txt
index ab330a9668..7bc1d15f1f 100644
--- a/packages/fcl-db/tests/database.ini.txt
+++ b/packages/fcl-db/tests/database.ini.txt
@@ -36,7 +36,7 @@ password=masterkey
 hostname=localhost
 
 ; SQL command log file (for sqldb databases)
-; will be overwritten each run
+; will be appended to each run
 ; uncomment to use
 ;logfile=sql.log