Hello community,

here is the log from the commit of package perl-Mojolicious for 
openSUSE:Factory checked in at 2020-04-23 18:38:14
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Mojolicious (Old)
 and      /work/SRC/openSUSE:Factory/.perl-Mojolicious.new.2738 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

Package is "perl-Mojolicious"

Thu Apr 23 18:38:14 2020 rev:129 rq:796517 version:8.40

Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Mojolicious/perl-Mojolicious.changes        
2020-04-22 20:57:31.963927760 +0200
+++ 
/work/SRC/openSUSE:Factory/.perl-Mojolicious.new.2738/perl-Mojolicious.changes  
    2020-04-23 18:38:15.452985351 +0200
@@ -1,0 +2,9 @@
+Thu Apr 23 10:37:37 UTC 2020 -  <[email protected]>
+
+- updated to 8.40
+   see /usr/share/doc/packages/perl-Mojolicious/Changes
+
+  8.40  2020-04-23
+    - Fixed support for disabling the inactivity timeout in Mojo::UserAgent.
+
+-------------------------------------------------------------------

Old:
----
  Mojolicious-8.39.tar.gz

New:
----
  Mojolicious-8.40.tar.gz

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

Other differences:
------------------
++++++ perl-Mojolicious.spec ++++++
--- /var/tmp/diff_new_pack.S9Svjy/_old  2020-04-23 18:38:16.404987172 +0200
+++ /var/tmp/diff_new_pack.S9Svjy/_new  2020-04-23 18:38:16.408987180 +0200
@@ -17,7 +17,7 @@
 
 
 Name:           perl-Mojolicious
-Version:        8.39
+Version:        8.40
 Release:        0
 %define cpan_name Mojolicious
 Summary:        Real-time web framework

++++++ Mojolicious-8.39.tar.gz -> Mojolicious-8.40.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/Changes new/Mojolicious-8.40/Changes
--- old/Mojolicious-8.39/Changes        2020-04-22 14:30:35.000000000 +0200
+++ new/Mojolicious-8.40/Changes        2020-04-23 11:21:27.000000000 +0200
@@ -1,4 +1,7 @@
 
+8.40  2020-04-23
+  - Fixed support for disabling the inactivity timeout in Mojo::UserAgent.
+
 8.39  2020-04-22
   - Fixed a bug in Mojo::Server::Daemon where active connections could get the
     keep-alive timeout assigned instead of the inactivity timeout.
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/META.json 
new/Mojolicious-8.40/META.json
--- old/Mojolicious-8.39/META.json      2020-04-22 14:48:56.000000000 +0200
+++ new/Mojolicious-8.40/META.json      2020-04-23 11:23:19.000000000 +0200
@@ -62,6 +62,6 @@
       },
       "x_IRC" : "irc://irc.freenode.net/#mojo"
    },
-   "version" : "8.39",
+   "version" : "8.40",
    "x_serialization_backend" : "JSON::PP version 4.04"
 }
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/META.yml 
new/Mojolicious-8.40/META.yml
--- old/Mojolicious-8.39/META.yml       2020-04-22 14:48:56.000000000 +0200
+++ new/Mojolicious-8.40/META.yml       2020-04-23 11:23:19.000000000 +0200
@@ -34,5 +34,5 @@
   homepage: https://mojolicious.org
   license: http://www.opensource.org/licenses/artistic-license-2.0
   repository: https://github.com/mojolicious/mojo.git
-version: '8.39'
+version: '8.40'
 x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojo/IOLoop/Stream.pm 
new/Mojolicious-8.40/lib/Mojo/IOLoop/Stream.pm
--- old/Mojolicious-8.39/lib/Mojo/IOLoop/Stream.pm      2020-04-19 
15:29:46.000000000 +0200
+++ new/Mojolicious-8.40/lib/Mojo/IOLoop/Stream.pm      2020-04-23 
11:20:56.000000000 +0200
@@ -82,7 +82,7 @@
     if (!$self->{timeout}) { $reactor->remove(delete $self->{timer}) }
     else                   { $reactor->again($self->{timer}, $self->{timeout}) 
}
   }
-  else {
+  elsif ($self->{timeout}) {
     weaken $self;
     $self->{timer} = $reactor->timer(
       $timeout => sub {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojo/IOLoop/Subprocess.pm 
new/Mojolicious-8.40/lib/Mojo/IOLoop/Subprocess.pm
--- old/Mojolicious-8.39/lib/Mojo/IOLoop/Subprocess.pm  2020-04-21 
15:55:21.000000000 +0200
+++ new/Mojolicious-8.40/lib/Mojo/IOLoop/Subprocess.pm  2020-04-22 
21:18:13.000000000 +0200
@@ -118,6 +118,18 @@
     }
   );
 
+  # Operation that would block the event loop for 5 seconds (with promise)
+  $subprocess->run_p(sub {
+    sleep 5;
+    return '♥', 'Mojolicious';
+  })->then(sub {
+    my @results = @_;
+    say "I $results[0] $results[1]!";
+  })->catch(sub  {
+    my $err = shift;
+    say "Subprocess error: $err";
+  });
+
   # Start event loop if necessary
   $subprocess->ioloop->start unless $subprocess->ioloop->is_running;
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojo/IOLoop.pm 
new/Mojolicious-8.40/lib/Mojo/IOLoop.pm
--- old/Mojolicious-8.39/lib/Mojo/IOLoop.pm     2020-04-21 21:48:51.000000000 
+0200
+++ new/Mojolicious-8.40/lib/Mojo/IOLoop.pm     2020-04-22 19:08:40.000000000 
+0200
@@ -603,7 +603,7 @@
 
 =head2 subprocess
 
-  my $subprocess = Mojo::IOLoop->subprocess(sub {...}, sub {...});
+  my $subprocess = Mojo::IOLoop->subprocess;
   my $subprocess = $loop->subprocess;
   my $subprocess = $loop->subprocess(sub {...}, sub {...});
 
@@ -612,18 +612,16 @@
 passed along to L<Mojo::IOLoop::Subprocess/"run">.
 
   # Operation that would block the event loop for 5 seconds
-  Mojo::IOLoop->subprocess(
-    sub {
-      my $subprocess = shift;
-      sleep 5;
-      return '♥', 'Mojolicious';
-    },
-    sub {
-      my ($subprocess, $err, @results) = @_;
-      say "Subprocess error: $err" and return if $err;
-      say "I $results[0] $results[1]!";
-    }
-  );
+  Mojo::IOLoop->subprocess->run_p(sub {
+    sleep 5;
+    return '♥', 'Mojolicious';
+  })->then(sub {
+    my @results = @_;
+    say "I $results[0] $results[1]!";
+  })->catch(sub  {
+    my $err = shift;
+    say "Subprocess error: $err";
+  });
 
 =head2 timer
 
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojo/UserAgent.pm 
new/Mojolicious-8.40/lib/Mojo/UserAgent.pm
--- old/Mojolicious-8.39/lib/Mojo/UserAgent.pm  2020-04-22 14:28:48.000000000 
+0200
+++ new/Mojolicious-8.40/lib/Mojo/UserAgent.pm  2020-04-23 11:20:49.000000000 
+0200
@@ -326,7 +326,7 @@
   $self->emit(start => $tx);
 
   # Allow test servers sharing the same event loop to clean up connections
-  $loop->next_tick(sub { }) or $loop->one_tick unless $loop->is_running;
+  !$loop->next_tick(sub { }) and $loop->one_tick unless $loop->is_running;
   return undef unless my $id = $self->_connection($loop, $tx, $cb);
 
   if (my $t = $self->request_timeout) {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojolicious/Guides/Cookbook.pod 
new/Mojolicious-8.40/lib/Mojolicious/Guides/Cookbook.pod
--- old/Mojolicious-8.39/lib/Mojolicious/Guides/Cookbook.pod    2020-04-21 
15:56:17.000000000 +0200
+++ new/Mojolicious-8.40/lib/Mojolicious/Guides/Cookbook.pod    2020-04-22 
18:53:35.000000000 +0200
@@ -842,7 +842,7 @@
     Mojo::IOLoop->subprocess->run_p(sub {
       sleep 5;
       return '♥', 'Mojolicious';
-    })->then( sub {
+    })->then(sub {
       my @results = @_;
       $c->render(text => "I $results[0] $results[1]!");
     })->catch(sub  {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/lib/Mojolicious.pm 
new/Mojolicious-8.40/lib/Mojolicious.pm
--- old/Mojolicious-8.39/lib/Mojolicious.pm     2020-04-21 21:53:05.000000000 
+0200
+++ new/Mojolicious-8.40/lib/Mojolicious.pm     2020-04-22 14:49:31.000000000 
+0200
@@ -59,7 +59,7 @@
 has validator => sub { Mojolicious::Validator->new };
 
 our $CODENAME = 'Supervillain';
-our $VERSION  = '8.39';
+our $VERSION  = '8.40';
 
 sub BUILD_DYNAMIC {
   my ($class, $method, $dyn_methods) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/t/mojo/user_agent.t 
new/Mojolicious-8.40/t/mojo/user_agent.t
--- old/Mojolicious-8.39/t/mojo/user_agent.t    2020-04-22 14:27:42.000000000 
+0200
+++ new/Mojolicious-8.40/t/mojo/user_agent.t    2020-04-23 11:20:52.000000000 
+0200
@@ -176,9 +176,21 @@
   ->then(sub { $result = shift->res->body })->wait;
 is $result, 'TEST', 'right result';
 
+# No timeout
+$ua = Mojo::UserAgent->new(inactivity_timeout => 0);
+my $tx = $ua->get('/');
+ok $tx->keep_alive, 'keep connection alive';
+is $tx->res->code, 200,      'right status';
+is $tx->res->body, 'works!', 'right content';
+$tx = $ua->get('/');
+ok $tx->kept_alive, 'kept connection alive';
+ok $tx->keep_alive, 'keep connection alive';
+is $tx->res->code, 200,      'right status';
+is $tx->res->body, 'works!', 'right content';
+
 # SOCKS proxy request without SOCKS support
 $ua = Mojo::UserAgent->new;
-my $tx = $ua->build_tx(GET => '/');
+$tx = $ua->build_tx(GET => '/');
 $tx->req->proxy($ua->server->url->scheme('socks'));
 $tx = $ua->start($tx);
 like $tx->error->{message}, qr/IO::Socket::Socks/, 'right error';
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' 
'--exclude=.svnignore' old/Mojolicious-8.39/t/mojolicious/websocket_lite_app.t 
new/Mojolicious-8.40/t/mojolicious/websocket_lite_app.t
--- old/Mojolicious-8.39/t/mojolicious/websocket_lite_app.t     2020-04-22 
13:53:33.000000000 +0200
+++ new/Mojolicious-8.40/t/mojolicious/websocket_lite_app.t     2020-04-23 
11:13:01.000000000 +0200
@@ -215,7 +215,8 @@
 
 # Timeout
 $t->websocket_ok('/timeout')->send_ok('timeout')
-  ->message_ok->message_is('timeout: 30')->send_ok('120')
+  ->message_ok->message_is('timeout: 30')->send_ok('0')
+  ->message_ok->message_is('0: 0')->send_ok('120')
   ->message_ok->message_is('120: 120')->finish_ok;
 
 # Compressed message exceeding the limit when decompressed


Reply via email to