Changeset 571

Timestamp:

04/27/09 19:37:19 (7 months ago)

Author:

ykerherve

Message:

It looks like SQLite version is more the culprit than
DBD::SQLite...

NOTE: The test behaviour changes starting at
SQLite 3.5.0 without proof that this is actual version
that introduced the change

Files:

• trunk/t/02-basic.t (modified) (1 diff)

trunk/t/02-basic.t

@@ -244 +244 @@
     # note sqlite is stupid and doesn't return the number of affected rows
     # quick hack because I can't rely on version.pm to be installed everywhere
-    my ($sqlite_version) = $DBD::SQLite::VERSION =~ /(\d+(?:\.\d+))/;
-    my $count = $sqlite_version > 1.22 ? scalar @bad_wines : 0E0;
+    my ($sqlite_version) = Wine->driver->rw_handle->{sqlite_version} =~ /(\d+(?:\.\d+))/;
+    my $count = $sqlite_version > 3.5 ? scalar @bad_wines : "0E0";
     is (Wine->remove({}, { nofetch => 1 }), $count, 'removing all bad wine');
 }