perl-DBD-SQLite/6002-fixed-for-older-DBI.patch
2019-09-30 11:11:56 -04:00

26 lines
857 B
Diff

From b0fad50e4c17edaffd0a0627232b5c50aa17bc64 Mon Sep 17 00:00:00 2001
From: Kenichi Ishigaki <ishigaki@cpan.org>
Date: Sat, 26 Jan 2019 07:12:40 +0900
Subject: [PATCH 093/102] fixed for older DBI
---
t/virtual_table/unknown_op.t | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/t/virtual_table/unknown_op.t b/t/virtual_table/unknown_op.t
index 885c1d2..c9f9952 100644
--- a/t/virtual_table/unknown_op.t
+++ b/t/virtual_table/unknown_op.t
@@ -14,7 +14,7 @@ our $scan_results = [
my $dbh = connect_ok(RaiseError => 1, AutoCommit => 1);
# register the module
-$dbh->sqlite_create_module(perl => "DBD::SQLite::VirtualTable::PerlData");
+$dbh->$sqlite_call(create_module => perl => "DBD::SQLite::VirtualTable::PerlData");
$dbh->do(<<'SQL');
CREATE VIRTUAL TABLE temp.scan_results
USING perl(file varchar,
--
2.19.1