Hello community,

here is the log from the commit of package perl-Mojo-Pg for openSUSE:Factory 
checked in at 2019-07-26 12:41:03
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Mojo-Pg (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Mojo-Pg.new.4126 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Mojo-Pg"

Fri Jul 26 12:41:03 2019 rev:19 rq:718496 version:4.15

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Mojo-Pg/perl-Mojo-Pg.changes        
2019-07-23 22:38:38.426955742 +0200
+++ /work/SRC/openSUSE:Factory/.perl-Mojo-Pg.new.4126/perl-Mojo-Pg.changes      
2019-07-26 12:41:06.993887529 +0200
@@ -1,0 +2,9 @@
+Thu Jul 25 05:15:39 UTC 2019 - Stephan Kulow <[email protected]>
+
+- updated to 4.15
+   see /usr/share/doc/packages/perl-Mojo-Pg/Changes
+
+  4.15  2019-07-24
+    - Improved compatibility with older versions of DBI.
+
+-------------------------------------------------------------------

Old:
----
  Mojo-Pg-4.14.tar.gz

New:
----
  Mojo-Pg-4.15.tar.gz

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

Other differences:
------------------
++++++ perl-Mojo-Pg.spec ++++++
--- /var/tmp/diff_new_pack.GFJvdu/_old  2019-07-26 12:41:08.393886919 +0200
+++ /var/tmp/diff_new_pack.GFJvdu/_new  2019-07-26 12:41:08.397886918 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Mojo-Pg
-Version:        4.14
+Version:        4.15
 Release:        0
 %define cpan_name Mojo-Pg
 Summary:        Wrapper around DBD::Pg for using PostgreSql with Mojolicious

++++++ Mojo-Pg-4.14.tar.gz -> Mojo-Pg-4.15.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojo-Pg-4.14/Changes new/Mojo-Pg-4.15/Changes
--- old/Mojo-Pg-4.14/Changes    2019-07-22 18:50:36.000000000 +0200
+++ new/Mojo-Pg-4.15/Changes    2019-07-24 12:09:01.000000000 +0200
@@ -1,4 +1,7 @@
 
+4.15  2019-07-24
+  - Improved compatibility with older versions of DBI.
+
 4.14  2019-07-22
   - Improved connection cache to be more than an order of magnitude faster for
     blocking queries.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojo-Pg-4.14/META.json new/Mojo-Pg-4.15/META.json
--- old/Mojo-Pg-4.14/META.json  2019-07-22 20:16:50.000000000 +0200
+++ new/Mojo-Pg-4.15/META.json  2019-07-24 12:09:52.000000000 +0200
@@ -57,6 +57,6 @@
       },
       "x_IRC" : "irc://irc.freenode.net/#mojo"
    },
-   "version" : "4.14",
+   "version" : "4.15",
    "x_serialization_backend" : "JSON::PP version 4.04"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojo-Pg-4.14/META.yml new/Mojo-Pg-4.15/META.yml
--- old/Mojo-Pg-4.14/META.yml   2019-07-22 20:16:50.000000000 +0200
+++ new/Mojo-Pg-4.15/META.yml   2019-07-24 12:09:52.000000000 +0200
@@ -30,5 +30,5 @@
   homepage: https://mojolicious.org
   license: http://www.opensource.org/licenses/artistic-license-2.0
   repository: https://github.com/mojolicious/mojo-pg.git
-version: '4.14'
+version: '4.15'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojo-Pg-4.14/lib/Mojo/Pg.pm 
new/Mojo-Pg-4.15/lib/Mojo/Pg.pm
--- old/Mojo-Pg-4.14/lib/Mojo/Pg.pm     2019-07-22 18:53:09.000000000 +0200
+++ new/Mojo-Pg-4.15/lib/Mojo/Pg.pm     2019-07-24 12:00:40.000000000 +0200
@@ -34,7 +34,7 @@
 has [qw(password username)] => '';
 has pubsub                  => sub { Mojo::Pg::PubSub->new(pg => shift) };
 
-our $VERSION = '4.14';
+our $VERSION = '4.15';
 
 sub db { $_[0]->database_class->new(dbh => $_[0]->_prepare, pg => $_[0]) }
 
@@ -102,8 +102,8 @@
 
   # Async connections need to be checked more carefully
   my $queue = $self->{queue} ||= [];
-  push @$queue, $dbh
-    if $dbh->{Active} && (delete $dbh->{private_mojo_async} ? $dbh->ping : 1);
+  $dbh->{private_mojo_async} = undef if my $async = $dbh->{private_mojo_async};
+  push @$queue, $dbh if $dbh->{Active} && ($async ? $dbh->ping : 1);
   shift @$queue while @$queue > $self->max_connections;
 }
 


Reply via email to