paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-12-04 06:02:07 +01:00
Code Issues Packages Projects Releases Wiki Activity

* Refactored test

Browse Source 
git-svn-id: trunk@10752 -
This commit is contained in:
joost 2008-04-21 19:40:05 +00:00
parent e9c91fbba1
commit 5ce1eb0dcb
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
packages/fcl-db/tests/testfieldtypes.pas
View File

@ -946,7 +946,7 @@ procedure TTestFieldTypes.TestNumericNames;
begin
with TSQLDBConnector(DBConnector) do
begin
if sqQuoteFieldnames in Connection.ConnOptions then
if not (SQLDbType in MySQLdbTypes) then
Connection.ExecuteDirect('create table FPDEV2 ( ' +
' "2ID" INT NOT NULL , ' +
' "3TEST" VARCHAR(10), ' +