Hello community,
here is the log from the commit of package perl-Mojolicious for
openSUSE:Factory checked in at 2019-05-21 10:40:00
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Comparing /work/SRC/openSUSE:Factory/perl-Mojolicious (Old)
and /work/SRC/openSUSE:Factory/.perl-Mojolicious.new.5148 (New)
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Mojolicious"
Tue May 21 10:40:00 2019 rev:109 rq:704251 version:8.16
Changes:
--------
--- /work/SRC/openSUSE:Factory/perl-Mojolicious/perl-Mojolicious.changes
2019-04-28 20:14:59.254361273 +0200
+++
/work/SRC/openSUSE:Factory/.perl-Mojolicious.new.5148/perl-Mojolicious.changes
2019-05-21 10:40:28.331083680 +0200
@@ -1,0 +2,12 @@
+Mon May 20 05:14:58 UTC 2019 - Stephan Kulow <[email protected]>
+
+- updated to 8.16
+ see /usr/share/doc/packages/perl-Mojolicious/Changes
+
+ 8.16 2019-05-14
+ - Improved Mojo::Headers to reject characters in header values that would
+ corrupt the HTTP message.
+ - Fixed getopt function in Mojo::Util to behave more like
GetOptionsFromArray.
+ (jberger, reneeb)
+
+-------------------------------------------------------------------
Old:
----
Mojolicious-8.15.tar.gz
New:
----
Mojolicious-8.16.tar.gz
++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Other differences:
------------------
++++++ perl-Mojolicious.spec ++++++
--- /var/tmp/diff_new_pack.YXzvVG/_old 2019-05-21 10:40:29.587082864 +0200
+++ /var/tmp/diff_new_pack.YXzvVG/_new 2019-05-21 10:40:29.627082838 +0200
@@ -17,7 +17,7 @@
Name: perl-Mojolicious
-Version: 8.15
+Version: 8.16
Release: 0
%define cpan_name Mojolicious
Summary: Real-time web framework
++++++ Mojolicious-8.15.tar.gz -> Mojolicious-8.16.tar.gz ++++++
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/Changes new/Mojolicious-8.16/Changes
--- old/Mojolicious-8.15/Changes 2019-04-26 16:02:39.000000000 +0200
+++ new/Mojolicious-8.16/Changes 2019-05-14 16:38:33.000000000 +0200
@@ -1,4 +1,10 @@
+8.16 2019-05-14
+ - Improved Mojo::Headers to reject characters in header values that would
+ corrupt the HTTP message.
+ - Fixed getopt function in Mojo::Util to behave more like
GetOptionsFromArray.
+ (jberger, reneeb)
+
8.15 2019-04-26
- Updated jQuery to version 3.4.0.
- Improved wait method in Mojo::Promise not to be affected by manually
stopped
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/META.json
new/Mojolicious-8.16/META.json
--- old/Mojolicious-8.15/META.json 2019-04-26 19:53:10.000000000 +0200
+++ new/Mojolicious-8.16/META.json 2019-05-19 21:49:29.000000000 +0200
@@ -4,7 +4,7 @@
"Sebastian Riedel <[email protected]>"
],
"dynamic_config" : 0,
- "generated_by" : "ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter
version 2.150010",
+ "generated_by" : "ExtUtils::MakeMaker version 7.36, CPAN::Meta::Converter
version 2.150010",
"license" : [
"artistic_2"
],
@@ -58,6 +58,6 @@
},
"x_IRC" : "irc://irc.freenode.net/#mojo"
},
- "version" : "8.15",
+ "version" : "8.16",
"x_serialization_backend" : "JSON::PP version 4.02"
}
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/META.yml
new/Mojolicious-8.16/META.yml
--- old/Mojolicious-8.15/META.yml 2019-04-26 19:53:10.000000000 +0200
+++ new/Mojolicious-8.16/META.yml 2019-05-19 21:49:29.000000000 +0200
@@ -7,7 +7,7 @@
configure_requires:
ExtUtils::MakeMaker: '0'
dynamic_config: 0
-generated_by: 'ExtUtils::MakeMaker version 7.34, CPAN::Meta::Converter version
2.150010'
+generated_by: 'ExtUtils::MakeMaker version 7.36, CPAN::Meta::Converter version
2.150010'
license: artistic_2
meta-spec:
url: http://module-build.sourceforge.net/META-spec-v1.4.html
@@ -31,5 +31,5 @@
homepage: https://mojolicious.org
license: http://www.opensource.org/licenses/artistic-license-2.0
repository: https://github.com/mojolicious/mojo.git
-version: '8.15'
+version: '8.16'
x_serialization_backend: 'CPAN::Meta::YAML version 0.018'
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/lib/Mojo/Headers.pm
new/Mojolicious-8.16/lib/Mojo/Headers.pm
--- old/Mojolicious-8.15/lib/Mojo/Headers.pm 2018-11-22 21:21:53.000000000
+0100
+++ new/Mojolicious-8.16/lib/Mojo/Headers.pm 2019-05-14 17:42:51.000000000
+0200
@@ -1,6 +1,7 @@
package Mojo::Headers;
use Mojo::Base -base;
+use Carp 'croak';
use Mojo::Util 'monkey_patch';
has max_line_size => sub { $ENV{MOJO_MAX_LINE_SIZE} || 8192 };
@@ -33,6 +34,8 @@
sub add {
my ($self, $name) = (shift, shift);
+ tr/\x0d\x0a// and croak "Invalid characters in $name header" for @_;
+
# Make sure we have a normal case entry for name
my $key = lc $name;
$self->{names}{$key} //= $name unless $NAMES{$key};
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/lib/Mojo/Util.pm
new/Mojolicious-8.16/lib/Mojo/Util.pm
--- old/Mojolicious-8.15/lib/Mojo/Util.pm 2019-01-27 22:36:11.000000000
+0100
+++ new/Mojolicious-8.16/lib/Mojo/Util.pm 2019-05-13 22:17:20.000000000
+0200
@@ -146,10 +146,13 @@
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),
@$opts);
- GetOptionsFromArray $array, @_;
+ my $result = GetOptionsFromArray $array, @_;
Getopt::Long::Configure($save);
+
+ return $result;
}
sub gunzip {
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/lib/Mojolicious.pm
new/Mojolicious-8.16/lib/Mojolicious.pm
--- old/Mojolicious-8.15/lib/Mojolicious.pm 2019-04-18 21:10:55.000000000
+0200
+++ new/Mojolicious-8.16/lib/Mojolicious.pm 2019-04-26 19:53:50.000000000
+0200
@@ -59,7 +59,7 @@
has validator => sub { Mojolicious::Validator->new };
our $CODENAME = 'Supervillain';
-our $VERSION = '8.15';
+our $VERSION = '8.16';
sub BUILD_DYNAMIC {
my ($class, $method, $dyn_methods) = @_;
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/t/mojo/headers.t
new/Mojolicious-8.16/t/mojo/headers.t
--- old/Mojolicious-8.15/t/mojo/headers.t 2018-11-22 21:22:55.000000000
+0100
+++ new/Mojolicious-8.16/t/mojo/headers.t 2019-05-14 17:13:57.000000000
+0200
@@ -243,4 +243,15 @@
is $headers->content_type, 'text/plain', 'right value';
is $headers->header('X-Bender'), 'Bite my shiny, metal ass!', 'right value';
+# Invalid characters
+$headers = Mojo::Headers->new;
+eval { $headers->add(Foo => "test\x0a") };
+like $@, qr/Invalid characters in Foo header/, 'right error';
+eval { $headers->header(Foo => "test\x0d") };
+like $@, qr/Invalid characters in Foo header/, 'right error';
+eval { $headers->append(Foo => "\x0atest") };
+like $@, qr/Invalid characters in Foo header/, 'right error';
+eval { $headers->header(Bar => "\x0a\x0dtest") };
+like $@, qr/Invalid characters in Bar header/, 'right error';
+
done_testing();
diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn'
'--exclude=.svnignore' old/Mojolicious-8.15/t/mojo/util.t
new/Mojolicious-8.16/t/mojo/util.t
--- old/Mojolicious-8.15/t/mojo/util.t 2018-11-22 21:23:03.000000000 +0100
+++ new/Mojolicious-8.16/t/mojo/util.t 2019-05-13 22:11:58.000000000 +0200
@@ -142,6 +142,25 @@
is_deeply \@ARGV, ['test'], 'right structure';
}
+# getopt (return value)
+{
+ local $SIG{__WARN__} = sub { };
+
+ my $return = getopt ['--lang', 'de'], 'l|lang=s' => \my $lang;
+ is $lang, 'de', 'right result';
+ ok $return, 'right return value';
+
+ $lang = undef;
+ $return = getopt ['--lnag', 'de'], 'l|lang=s' => \$lang;
+ is $lang, undef, 'right result';
+ ok !$return, 'right return value';
+
+ $lang = undef;
+ $return = getopt ['--lnag', 'de', '--lang', 'de'], 'l|lang=s' => \$lang;
+ is $lang, 'de', 'right result';
+ ok !$return, 'right return value';
+}
+
# unindent
is unindent(" test\n 123\n 456\n"), "test\n 123\n456\n",
'right unindented result';
