Преглед на файлове

fcl-db: tests: cosmetic

git-svn-id: trunk@27647 -
reiniero преди 11 години
родител
ревизия
b1435f7756
променени са 1 файла, в които са добавени 3 реда и са изтрити 1 реда
  1. 3 1
      packages/fcl-db/tests/testfieldtypes.pas

+ 3 - 1
packages/fcl-db/tests/testfieldtypes.pas

@@ -2365,5 +2365,7 @@ end;
 
 
 initialization
-  if uppercase(dbconnectorname)='SQL' then RegisterTest(TTestFieldTypes);
+  // Only test if using sqldb
+  if uppercase(dbconnectorname)='SQL' then
+    RegisterTest(TTestFieldTypes);
 end.