Hello community,

here is the log from the commit of package perl-DBD-SQLite for openSUSE:Factory 
checked in at 2018-04-06 17:45:03
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-DBD-SQLite (Old)
 and      /work/SRC/openSUSE:Factory/.perl-DBD-SQLite.new (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-DBD-SQLite"

Fri Apr  6 17:45:03 2018 rev:40 rq:593461 version:1.58

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-DBD-SQLite/perl-DBD-SQLite.changes  
2018-03-07 10:30:20.123876257 +0100
+++ /work/SRC/openSUSE:Factory/.perl-DBD-SQLite.new/perl-DBD-SQLite.changes     
2018-04-06 17:45:24.400465358 +0200
@@ -1,0 +2,13 @@
+Thu Mar 29 05:11:10 UTC 2018 - co...@suse.com
+
+- updated to 1.58
+   see /usr/share/doc/packages/perl-DBD-SQLite/Changes
+
+  1.58 2018-03-28
+      - Switched to a production version.
+  
+  1.57_01 2018-03-21
+      - Made it an error to fetch attributes from a statement 
+        handle whose database handle is inactive (ribasushi++)
+
+-------------------------------------------------------------------

Old:
----
  DBD-SQLite-1.56.tar.gz

New:
----
  DBD-SQLite-1.58.tar.gz

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Other differences:
------------------
++++++ perl-DBD-SQLite.spec ++++++
--- /var/tmp/diff_new_pack.NRDQqE/_old  2018-04-06 17:45:26.460390967 +0200
+++ /var/tmp/diff_new_pack.NRDQqE/_new  2018-04-06 17:45:26.464390822 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-DBD-SQLite
-Version:        1.56
+Version:        1.58
 Release:        0
 %define cpan_name DBD-SQLite
 Summary:        Self-contained RDBMS in a DBI Driver

++++++ DBD-SQLite-1.56.tar.gz -> DBD-SQLite-1.58.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/Changes new/DBD-SQLite-1.58/Changes
--- old/DBD-SQLite-1.56/Changes 2018-02-28 09:58:37.000000000 +0100
+++ new/DBD-SQLite-1.58/Changes 2018-03-28 13:54:06.000000000 +0200
@@ -1,5 +1,12 @@
 Changes for Perl extension DBD-SQLite
 
+1.58 2018-03-28
+    - Switched to a production version.
+
+1.57_01 2018-03-21
+    - Made it an error to fetch attributes from a statement 
+      handle whose database handle is inactive (ribasushi++)
+
 1.56 2018-02-28
     - Switched to a production version.
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/META.json 
new/DBD-SQLite-1.58/META.json
--- old/DBD-SQLite-1.56/META.json       2018-02-28 10:00:52.000000000 +0100
+++ new/DBD-SQLite-1.58/META.json       2018-03-28 13:54:10.000000000 +0200
@@ -55,6 +55,6 @@
       },
       "x_MailingList" : 
"http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbd-sqlite";
    },
-   "version" : "1.56",
+   "version" : "1.58",
    "x_serialization_backend" : "JSON::PP version 2.94"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/META.yml new/DBD-SQLite-1.58/META.yml
--- old/DBD-SQLite-1.56/META.yml        2018-02-28 10:00:52.000000000 +0100
+++ new/DBD-SQLite-1.58/META.yml        2018-03-28 13:54:10.000000000 +0200
@@ -30,5 +30,5 @@
   bugtracker: http://rt.cpan.org/Public/Dist/Display.html?Name=DBD-SQLite
   license: http://dev.perl.org/licenses/
   repository: https://github.com/DBD-SQLite/DBD-SQLite
-version: '1.56'
+version: '1.58'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.012'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/dbdimp.c new/DBD-SQLite-1.58/dbdimp.c
--- old/DBD-SQLite-1.56/dbdimp.c        2017-12-15 19:33:01.000000000 +0100
+++ new/DBD-SQLite-1.58/dbdimp.c        2018-03-28 08:18:55.000000000 +0200
@@ -1312,6 +1312,11 @@
     croak_if_db_is_null();
     croak_if_stmt_is_null();
 
+    if (!DBIc_ACTIVE(imp_dbh)) {
+        sqlite_error(sth, -2, "attempt to fetch on inactive database handle");
+        return FALSE;
+    }
+
     if (strEQ(key, "sqlite_unprepared_statements")) {
         return sv_2mortal(newSVpv(imp_sth->unprepared_statements, 0));
     }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/lib/DBD/SQLite/VirtualTable.pm 
new/DBD-SQLite-1.58/lib/DBD/SQLite/VirtualTable.pm
--- old/DBD-SQLite-1.56/lib/DBD/SQLite/VirtualTable.pm  2018-02-28 
09:58:10.000000000 +0100
+++ new/DBD-SQLite-1.58/lib/DBD/SQLite/VirtualTable.pm  2018-03-28 
13:52:17.000000000 +0200
@@ -5,7 +5,7 @@
 use warnings;
 use Scalar::Util    qw/weaken/;
 
-our $VERSION = '1.56';
+our $VERSION = '1.58';
 our @ISA;
 
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/lib/DBD/SQLite.pm 
new/DBD-SQLite-1.58/lib/DBD/SQLite.pm
--- old/DBD-SQLite-1.56/lib/DBD/SQLite.pm       2018-02-28 09:58:10.000000000 
+0100
+++ new/DBD-SQLite-1.58/lib/DBD/SQLite.pm       2018-03-28 13:52:17.000000000 
+0200
@@ -5,7 +5,7 @@
 use DBI   1.57 ();
 use DynaLoader ();
 
-our $VERSION = '1.56';
+our $VERSION = '1.58';
 our @ISA     = 'DynaLoader';
 
 # sqlite_version cache (set in the XS bootstrap)
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/DBD-SQLite-1.56/t/32_inactive_error.t 
new/DBD-SQLite-1.58/t/32_inactive_error.t
--- old/DBD-SQLite-1.56/t/32_inactive_error.t   2017-08-29 00:11:58.000000000 
+0200
+++ new/DBD-SQLite-1.58/t/32_inactive_error.t   2018-03-21 06:44:21.000000000 
+0100
@@ -6,7 +6,7 @@
        $^W = 1;
 }
 
-use Test::More tests => 4;
+use Test::More tests => 7;
 use lib "t/lib";
 use SQLiteTest;
 
@@ -33,3 +33,18 @@
        qr/attempt to execute on inactive database handle/,
        'Got the expected warning',
 );
+
+@warning = ();
+SCOPE: {
+       local $SIG{__WARN__} = sub { push @warning, @_; return };
+       my $ret = eval { $sth->{NUM_OF_PARAMS}; };
+       # we need PrintError => 1, or warn $@ if $@;
+       ok !$ret;
+}
+
+is( scalar(@warning), 1, 'Got 1 warning' );
+like(
+       $warning[0],
+       qr/attempt to fetch on inactive database handle/,
+       'Got the expected warning',
+);


Reply via email to