Hello community, here is the log from the commit of package perl-Mojolicious for openSUSE:Factory checked in at 2017-05-10 20:34:41 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Mojolicious (Old) and /work/SRC/openSUSE:Factory/.perl-Mojolicious.new (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Mojolicious" Wed May 10 20:34:41 2017 rev:67 rq:492953 version:7.31 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Mojolicious/perl-Mojolicious.changes 2017-04-17 10:23:05.709542053 +0200 +++ /work/SRC/openSUSE:Factory/.perl-Mojolicious.new/perl-Mojolicious.changes 2017-05-10 20:34:43.408558452 +0200 @@ -1,0 +2,17 @@ +Tue Apr 25 06:11:18 UTC 2017 - co...@suse.com + +- updated to 7.31 + see /usr/share/doc/packages/perl-Mojolicious/Changes + + 7.31 2017-04-23 + - Removed deprecated files, slurp and spurt functions from Mojo::Util. + - Removed deprecated parts attribute from Mojo::Home. + - Removed deprecated slurp and spurt methods from Mojo::ByteStream. + - Removed deprecated lib_dir, list_files, parse and rel_dir methods from + Mojo::Home. + - Removed deprecated rel_dir method from Mojolicious::Command. + - Removed deprecated is_status_class method from Mojo::Message::Response. + - Fixed a bug in the app generator command where the config file name was not + based on the application moniker. + +------------------------------------------------------------------- Old: ---- Mojolicious-7.30.tar.gz New: ---- Mojolicious-7.31.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Mojolicious.spec ++++++ --- /var/tmp/diff_new_pack.VcvY1Z/_old 2017-05-10 20:34:44.220443906 +0200 +++ /var/tmp/diff_new_pack.VcvY1Z/_new 2017-05-10 20:34:44.228442777 +0200 @@ -17,7 +17,7 @@ Name: perl-Mojolicious -Version: 7.30 +Version: 7.31 Release: 0 %define cpan_name Mojolicious Summary: Real-time web framework ++++++ Mojolicious-7.30.tar.gz -> Mojolicious-7.31.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/Changes new/Mojolicious-7.31/Changes --- old/Mojolicious-7.30/Changes 2017-04-04 17:06:11.000000000 +0200 +++ new/Mojolicious-7.31/Changes 2017-04-23 20:56:24.000000000 +0200 @@ -1,4 +1,15 @@ +7.31 2017-04-23 + - Removed deprecated files, slurp and spurt functions from Mojo::Util. + - Removed deprecated parts attribute from Mojo::Home. + - Removed deprecated slurp and spurt methods from Mojo::ByteStream. + - Removed deprecated lib_dir, list_files, parse and rel_dir methods from + Mojo::Home. + - Removed deprecated rel_dir method from Mojolicious::Command. + - Removed deprecated is_status_class method from Mojo::Message::Response. + - Fixed a bug in the app generator command where the config file name was not + based on the application moniker. + 7.30 2017-04-04 - Deprecated Mojo::Server::Morbo::watch in favor of Mojo::Server::Morbo::Backend::Poll::watch. (marcus) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/META.json new/Mojolicious-7.31/META.json --- old/Mojolicious-7.30/META.json 2017-04-06 14:03:33.000000000 +0200 +++ new/Mojolicious-7.31/META.json 2017-04-24 09:49:57.000000000 +0200 @@ -58,6 +58,6 @@ }, "x_IRC" : "irc://irc.perl.org/#mojo" }, - "version" : "7.30", + "version" : "7.31", "x_serialization_backend" : "JSON::PP version 2.27400" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/META.yml new/Mojolicious-7.31/META.yml --- old/Mojolicious-7.30/META.yml 2017-04-06 14:03:33.000000000 +0200 +++ new/Mojolicious-7.31/META.yml 2017-04-24 09:49:56.000000000 +0200 @@ -31,5 +31,5 @@ homepage: http://mojolicious.org license: http://www.opensource.org/licenses/artistic-license-2.0 repository: https://github.com/kraih/mojo.git -version: '7.30' +version: '7.31' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/ByteStream.pm new/Mojolicious-7.31/lib/Mojo/ByteStream.pm --- old/Mojolicious-7.30/lib/Mojo/ByteStream.pm 2017-01-09 18:47:43.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojo/ByteStream.pm 2017-04-12 17:03:22.000000000 +0200 @@ -47,31 +47,11 @@ sub size { length ${$_[0]} } -# DEPRECATED! -sub slurp { - Mojo::Util::deprecated 'Mojo::ByteStream::slurp is DEPRECATED' - . ' in favor of Mojo::File::slurp'; - require Mojo::File; - my $self = shift; - $$self = Mojo::File->new($$self)->slurp; - return $self; -} - sub split { my ($self, $pattern) = @_; return Mojo::Collection->new(map { $self->new($_) } split $pattern, $$self); } -# DEPRECATED! -sub spurt { - Mojo::Util::deprecated 'Mojo::ByteStream::spurt is DEPRECATED' - . ' in favor of Mojo::File::spurt'; - require Mojo::File; - my $self = shift; - Mojo::File->new(shift)->spurt($$self); - return $self; -} - sub tap { shift->Mojo::Base::tap(@_) } sub to_string { ${$_[0]} } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/DOM.pm new/Mojolicious-7.31/lib/Mojo/DOM.pm --- old/Mojolicious-7.30/lib/Mojo/DOM.pm 2016-12-28 20:01:15.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojo/DOM.pm 2017-04-22 14:25:24.000000000 +0200 @@ -430,16 +430,16 @@ my $dom = Mojo::DOM->new('<?xml version="1.0"?><P ID="greeting">Hi!</P>'); say $dom->at('P[ID]')->text; -XML detection can also be disabled with the L</"xml"> method. - - # Force XML semantics - my $dom = Mojo::DOM->new->xml(1)->parse('<P ID="greeting">Hi!</P>'); - say $dom->at('P[ID]')->text; +HTML or XML semantics can also be forced with the L</"xml"> method. # Force HTML semantics my $dom = Mojo::DOM->new->xml(0)->parse('<P ID="greeting">Hi!</P>'); say $dom->at('p[id]')->text; + # Force XML semantics + my $dom = Mojo::DOM->new->xml(1)->parse('<P ID="greeting">Hi!</P>'); + say $dom->at('P[ID]')->text; + =head1 METHODS L<Mojo::DOM> implements the following methods. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/Home.pm new/Mojolicious-7.31/lib/Mojo/Home.pm --- old/Mojolicious-7.30/lib/Mojo/Home.pm 2017-03-05 23:05:41.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojo/Home.pm 2017-04-12 17:05:22.000000000 +0200 @@ -1,7 +1,7 @@ package Mojo::Home; use Mojo::Base 'Mojo::File'; -use Mojo::Util qw(class_to_path deprecated); +use Mojo::Util 'class_to_path'; sub detect { my ($self, $class) = @_; @@ -22,48 +22,8 @@ return $self; } -# DEPRECATED! -sub lib_dir { - deprecated 'Mojo::Home::lib_dir is DEPRECATED'; - shift->child('lib')->to_string; -} - -# DEPRECATED! -sub list_files { - deprecated - 'Mojo::Home::list_files is DEPRECATED in favor of Mojo::Files::list_tree'; - my ($self, $dir, $options) = (shift, shift // '', shift); - my $base = $self->child(split('/', $dir)); - $base->list_tree($options)->map(sub { join '/', @{$_->to_rel($base)} }) - ->to_array; -} - sub mojo_lib_dir { shift->new(__FILE__)->sibling('..') } -# DEPRECATED! -sub parse { - deprecated 'Mojo::Home::parse is DEPRECATED'; - my $self = shift; - $$self = shift; - return $self; -} - -# DEPRECATED! -sub parts { - deprecated 'Mojo::Home::parts is DEPRECATED'; - my $self = shift; - return $self->to_array unless @_; - $$self = Mojo::File->new(@{shift()})->to_string; - return $self; -} - -# DEPRECATED! -sub rel_dir { - deprecated - 'Mojo::Home::rel_dir is DEPRECATED in favor of Mojo::Home::rel_file'; - Mojo::File->new(@{shift->parts}, split('/', shift))->to_string; -} - sub rel_file { shift->child(split('/', shift)) } 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/Message/Response.pm new/Mojolicious-7.31/lib/Mojo/Message/Response.pm --- old/Mojolicious-7.30/lib/Mojo/Message/Response.pm 2017-01-29 22:33:08.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojo/Message/Response.pm 2017-04-12 17:09:19.000000000 +0200 @@ -3,7 +3,6 @@ use Mojo::Cookie::Response; use Mojo::Date; -use Mojo::Util 'deprecated'; has [qw(code message)]; has max_message_size => sub { $ENV{MOJO_MAX_MESSAGE_SIZE} // 2147483648 }; @@ -134,13 +133,6 @@ sub is_redirect { shift->_status_class(300) } sub is_server_error { shift->_status_class(500) } -# DEPRECATED! -sub is_status_class { - deprecated 'Mojo::Message::Response::is_status_class is DEPRECATED' - . ' in favor of new is_* methods'; - shift->_status_class(@_); -} - sub is_success { shift->_status_class(200) } sub start_line_size { length shift->_start_line->{start_buffer} } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/Server/Morbo/Backend/Poll.pm new/Mojolicious-7.31/lib/Mojo/Server/Morbo/Backend/Poll.pm --- old/Mojolicious-7.30/lib/Mojo/Server/Morbo/Backend/Poll.pm 2017-04-04 17:02:28.000000000 +0200 +++ new/Mojolicious-7.31/lib/Mojo/Server/Morbo/Backend/Poll.pm 2017-04-12 17:49:58.000000000 +0200 @@ -6,7 +6,6 @@ sub modified_files { my $self = shift; - sleep $self->watch_timeout; my $cache = $self->{cache} ||= {}; my @files; for my $file (map { -f $_ && -r _ ? $_ : _list($_) } @{$self->watch}) { @@ -17,6 +16,7 @@ @$stats = ($mtime, $size); push @files, $file; } + sleep $self->watch_timeout unless @files; return \@files; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojo/Util.pm new/Mojolicious-7.31/lib/Mojo/Util.pm --- old/Mojolicious-7.30/lib/Mojo/Util.pm 2017-03-09 21:03:15.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojo/Util.pm 2017-04-12 17:09:52.000000000 +0200 @@ -66,9 +66,6 @@ qw(unindent unquote url_escape url_unescape xml_escape xor_encode) ); -# DEPRECATED! -push @EXPORT_OK, qw(files slurp spurt); - # Aliases monkey_patch(__PACKAGE__, 'b64_decode', \&decode_base64); monkey_patch(__PACKAGE__, 'b64_encode', \&encode_base64); @@ -142,14 +139,6 @@ return unindent($output); } -# DEPRECATED! -sub files { - deprecated - 'Mojo::Util::files is DEPRECATED in favor of Mojo::File::list_tree'; - require Mojo::File; - Mojo::File->new(shift)->list_tree(@_)->map('to_string')->each; -} - sub getopt { my ($array, $opts) = map { ref $_[0] eq 'ARRAY' ? shift : $_ } \@ARGV, []; my $save = Getopt::Long::Configure(qw(default no_auto_abbrev no_ignore_case), @@ -259,23 +248,9 @@ return $r == 0; } -# DEPRECATED! -sub slurp { - deprecated 'Mojo::Util::slurp is DEPRECATED in favor of Mojo::File::slurp'; - require Mojo::File; - Mojo::File->new(shift)->slurp; -} - sub split_cookie_header { _header(shift, 1) } sub split_header { _header(shift, 0) } -# DEPRECATED! -sub spurt { - deprecated 'Mojo::Util::spurt is DEPRECATED in favor of Mojo::File::spurt'; - require Mojo::File; - Mojo::File->new($_[1])->spurt($_[0]) and return $_[0]; -} - sub tablify { my $rows = shift; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojolicious/Command/generate/app.pm new/Mojolicious-7.31/lib/Mojolicious/Command/generate/app.pm --- old/Mojolicious-7.30/lib/Mojolicious/Command/generate/app.pm 2017-03-05 20:01:27.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojolicious/Command/generate/app.pm 2017-04-22 14:31:15.000000000 +0200 @@ -1,7 +1,7 @@ package Mojolicious::Command::generate::app; use Mojo::Base 'Mojolicious::Command'; -use Mojo::Util qw(class_to_file class_to_path); +use Mojo::Util qw(class_to_file class_to_path decamelize); has description => 'Generate Mojolicious application directory structure'; has usage => sub { shift->extract_usage }; @@ -25,8 +25,8 @@ my $app = class_to_path $class; $self->render_to_rel_file('appclass', "$name/lib/$app", $class); - # Config file - $self->render_to_rel_file('config', "$name/$name.conf"); + # Config file (using the default moniker) + $self->render_to_rel_file('config', "$name/@{[decamelize $class]}.conf"); # Controller my $controller = "${class}::Controller::Example"; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojolicious/Command.pm new/Mojolicious-7.31/lib/Mojolicious/Command.pm --- old/Mojolicious-7.30/lib/Mojolicious/Command.pm 2017-03-07 22:17:16.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojolicious/Command.pm 2017-04-12 17:10:08.000000000 +0200 @@ -6,7 +6,6 @@ use Mojo::Loader 'data_section'; use Mojo::Server; use Mojo::Template; -use Mojo::Util 'deprecated'; has app => sub { Mojo::Server->new->build_app('Mojo::HelloWorld') }; has description => 'No description'; @@ -34,13 +33,6 @@ sub help { print shift->usage } -# DEPRECATED! -sub rel_dir { - deprecated 'Mojolicious::Command::rel_dir is DEPRECATED' - . ' in favor of Mojolicious::Command::rel_file'; - path->child(split('/', pop))->to_string; -} - sub rel_file { path->child(split('/', pop)) } sub render_data { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojolicious/Guides/Routing.pod new/Mojolicious-7.31/lib/Mojolicious/Guides/Routing.pod --- old/Mojolicious-7.30/lib/Mojolicious/Guides/Routing.pod 2017-01-30 20:51:27.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojolicious/Guides/Routing.pod 2017-04-23 00:47:32.000000000 +0200 @@ -73,7 +73,7 @@ expressions, so you can get the best of both worlds with a little bit of experience. - /user/show/:id -> qr/(?-xism:^\/user\/show/([^\/.]+))/ + /user/show/:id -> qr/(?-xism:^\/user\/show\/([^\/.]+))/ A trailing slash in the path is always optional. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojolicious/Plugin/TagHelpers.pm new/Mojolicious-7.31/lib/Mojolicious/Plugin/TagHelpers.pm --- old/Mojolicious-7.30/lib/Mojolicious/Plugin/TagHelpers.pm 2016-12-17 00:36:58.000000000 +0100 +++ new/Mojolicious-7.31/lib/Mojolicious/Plugin/TagHelpers.pm 2017-04-24 09:47:24.000000000 +0200 @@ -78,8 +78,8 @@ # Checkbox or radiobutton my $type = $attrs{type} || ''; if ($type eq 'checkbox' || $type eq 'radio') { - delete $attrs{checked} if @values; my $value = $attrs{value} // 'on'; + delete $attrs{checked}; $attrs{checked} = undef if grep { $_ eq $value } @values; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/lib/Mojolicious.pm new/Mojolicious-7.31/lib/Mojolicious.pm --- old/Mojolicious-7.30/lib/Mojolicious.pm 2017-04-03 15:46:24.000000000 +0200 +++ new/Mojolicious-7.31/lib/Mojolicious.pm 2017-04-06 14:04:12.000000000 +0200 @@ -58,7 +58,7 @@ has validator => sub { Mojolicious::Validator->new }; our $CODENAME = 'Doughnut'; -our $VERSION = '7.30'; +our $VERSION = '7.31'; sub AUTOLOAD { my $self = shift; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/t/mojo/morbo.t new/Mojolicious-7.31/t/mojo/morbo.t --- old/Mojolicious-7.30/t/mojo/morbo.t 2017-04-04 16:42:13.000000000 +0200 +++ new/Mojolicious-7.31/t/mojo/morbo.t 2017-04-12 17:31:23.000000000 +0200 @@ -13,6 +13,7 @@ use IO::Socket::INET; use Mojo::File 'tempdir'; use Mojo::IOLoop::Server; +use Mojo::Server::Morbo::Backend; use Mojo::Server::Daemon; use Mojo::Server::Morbo; use Mojo::UserAgent; @@ -143,11 +144,13 @@ # Custom backend { local $ENV{MOJO_MORBO_BACKEND} = 'TestBackend'; + local $ENV{MOJO_MORBO_TIMEOUT} = 2; my $test_morbo = Mojo::Server::Morbo->new; isa_ok $test_morbo->backend, 'Mojo::Server::Morbo::Backend::TestBackend', 'right backend'; is_deeply $test_morbo->backend->modified_files, ['always_changed'], 'always changes'; + is $test_morbo->backend->watch_timeout, 2, 'right timeout'; } # SO_REUSEPORT @@ -172,6 +175,10 @@ 'SO_REUSEPORT socket option'; } +# Abstract methods +eval { Mojo::Server::Morbo::Backend->modified_files }; +like $@, qr/Method "modified_files" not implemented by subclass/, 'right error'; + sub _port { IO::Socket::INET->new(PeerAddr => '127.0.0.1', PeerPort => shift) } sub _reuse_port { diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Mojolicious-7.30/t/pod_coverage.t new/Mojolicious-7.31/t/pod_coverage.t --- old/Mojolicious-7.30/t/pod_coverage.t 2017-04-04 16:39:05.000000000 +0200 +++ new/Mojolicious-7.31/t/pod_coverage.t 2017-04-12 17:11:23.000000000 +0200 @@ -8,6 +8,4 @@ unless eval 'use Test::Pod::Coverage 1.04; 1'; # DEPRECATED! -my @deprecated - = qw(files is_status_class lib_dir parse parts rel_dir slurp spurt watch); -all_pod_coverage_ok({also_private => \@deprecated}); +all_pod_coverage_ok({also_private => ['watch']});