删除文件 0004-added-a-boilerplace-for-test.patch
This commit is contained in:
parent
b02cedaf6a
commit
aadeec82be
@ -1,48 +0,0 @@
|
|||||||
From 90ec098f1ccd5e253799a656de630bfab7badd3b Mon Sep 17 00:00:00 2001
|
|
||||||
From: Kenichi Ishigaki <ishigaki@cpan.org>
|
|
||||||
Date: Sat, 26 Jan 2019 06:56:16 +0900
|
|
||||||
Subject: [PATCH 091/102] added a boilerplace for test
|
|
||||||
|
|
||||||
---
|
|
||||||
t/virtual_table/unknown_op.t | 15 +++++++++------
|
|
||||||
1 file changed, 9 insertions(+), 6 deletions(-)
|
|
||||||
|
|
||||||
diff --git a/t/virtual_table/unknown_op.t b/t/virtual_table/unknown_op.t
|
|
||||||
index e8fe04b..885c1d2 100644
|
|
||||||
--- a/t/virtual_table/unknown_op.t
|
|
||||||
+++ b/t/virtual_table/unknown_op.t
|
|
||||||
@@ -1,7 +1,9 @@
|
|
||||||
-#!perl -w
|
|
||||||
-
|
|
||||||
use strict;
|
|
||||||
-use Test::More tests => 4;
|
|
||||||
+use warnings;
|
|
||||||
+use lib "t/lib";
|
|
||||||
+use SQLiteTest;
|
|
||||||
+use Test::More;
|
|
||||||
+use if -d ".git", "Test::FailWarnings";
|
|
||||||
|
|
||||||
our $scan_results = [
|
|
||||||
{ nodepath => 1 },
|
|
||||||
@@ -9,8 +11,7 @@ our $scan_results = [
|
|
||||||
{ nodepath => 3 },
|
|
||||||
];
|
|
||||||
|
|
||||||
-my $dbh = DBI->connect("dbi:SQLite:dbname=:memory:", '', '',
|
|
||||||
- {RaiseError => 1, AutoCommit => 1});
|
|
||||||
+my $dbh = connect_ok(RaiseError => 1, AutoCommit => 1);
|
|
||||||
|
|
||||||
# register the module
|
|
||||||
$dbh->sqlite_create_module(perl => "DBD::SQLite::VirtualTable::PerlData");
|
|
||||||
@@ -90,4 +91,6 @@ is $ok, 1, "We survive an isnull comparison on the right side";
|
|
||||||
undef $ok;
|
|
||||||
#my $rows = $sth->fetchall_arrayref;
|
|
||||||
#use Data::Dumper;
|
|
||||||
-#warn Dumper $rows;
|
|
||||||
\ No newline at end of file
|
|
||||||
+#warn Dumper $rows;
|
|
||||||
+
|
|
||||||
+done_testing;
|
|
||||||
--
|
|
||||||
2.19.1
|
|
||||||
|
|
||||||
Loading…
x
Reference in New Issue
Block a user