From 59f186e7b789b83c9f1d149a3e486283d9f4b741 Mon Sep 17 00:00:00 2001 From: lacak <lacak@idefix.freepascal.org> Date: Tue, 13 Aug 2019 07:31:12 +0000 Subject: [PATCH] fcl-db: base: cosmetic (char-case) git-svn-id: trunk@42672 - --- packages/fcl-db/src/base/db.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/packages/fcl-db/src/base/db.pas b/packages/fcl-db/src/base/db.pas index 71e9ebae78..5ab2f89122 100644 --- a/packages/fcl-db/src/base/db.pas +++ b/packages/fcl-db/src/base/db.pas @@ -1563,7 +1563,7 @@ type function GetRecordCount: Longint; virtual; function GetRecNo: Longint; virtual; procedure InitFieldDefs; virtual; - procedure InitFieldDefsFromfields; + procedure InitFieldDefsFromFields; procedure InitRecord(Buffer: TRecordBuffer); virtual; procedure InternalCancel; virtual; procedure InternalEdit; virtual;