Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-Plack for openSUSE:Factory checked in at 2022-09-09 18:27:47 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-Plack (Old) and /work/SRC/openSUSE:Factory/.perl-Plack.new.2083 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-Plack" Fri Sep 9 18:27:47 2022 rev:12 rq:1002178 version:1.0050 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-Plack/perl-Plack.changes 2020-12-02 13:58:06.373793859 +0100 +++ /work/SRC/openSUSE:Factory/.perl-Plack.new.2083/perl-Plack.changes 2022-09-09 18:29:20.845239515 +0200 @@ -1,0 +2,20 @@ +Tue Sep 6 03:09:04 UTC 2022 - Tina M??ller <[email protected]> + +- updated to 1.0050 + see /usr/share/doc/packages/perl-Plack/Changes + + 1.0050 2022-09-05 08:46:44 PDT + [BUG FIXES] + - Revert #660 where POST requests failed when Middleware::Static was used with a code in `path` (#683) + + 1.0049 2022-09-01 10:43:42 PDT + [IMPROVEMENTS] + - Fix typos in docs #659 + - Test improvements, including moving from Travis CI to GitHub + - Restrict non-GET/HEAD requests to App::File #662 + - Improved nginx FastCGI example #675 + - Added documentation about port 5000 for MacOS Montery + - Added verify_SSL in Plack::LWPish #677 + - Added 'force' option to IIS6ScriptNameFix #679 + +------------------------------------------------------------------- Old: ---- Plack-1.0048.tar.gz New: ---- Plack-1.0050.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-Plack.spec ++++++ --- /var/tmp/diff_new_pack.yKGKu2/_old 2022-09-09 18:29:21.213240483 +0200 +++ /var/tmp/diff_new_pack.yKGKu2/_new 2022-09-09 18:29:21.217240494 +0200 @@ -1,7 +1,7 @@ # # spec file for package perl-Plack # -# Copyright (c) 2020 SUSE LLC +# Copyright (c) 2022 SUSE LLC # # All modifications and additions to the file contributed by third parties # remain the property of their copyright owners, unless otherwise agreed @@ -16,18 +16,16 @@ # +%define cpan_name Plack Name: perl-Plack -Version: 1.0048 +Version: 1.0050 Release: 0 -%define cpan_name Plack -Summary: Perl Superglue for Web frameworks and Web Servers (PSGI toolkit) License: Artistic-1.0 OR GPL-1.0-or-later -Group: Development/Libraries/Perl +Summary: Perl Superglue for Web frameworks and Web Servers (PSGI toolkit) URL: https://metacpan.org/release/%{cpan_name} Source0: https://cpan.metacpan.org/authors/id/M/MI/MIYAGAWA/%{cpan_name}-%{version}.tar.gz Source1: cpanspec.yml BuildArch: noarch -BuildRoot: %{_tmppath}/%{name}-%{version}-build BuildRequires: perl BuildRequires: perl-macros BuildRequires: perl(Apache::LogFormat::Compiler) >= 0.33 @@ -80,12 +78,12 @@ Plack are and why we need them. %prep -%setup -q -n %{cpan_name}-%{version} +%autosetup -n %{cpan_name}-%{version} find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -name "configure" -print0 | xargs -0 chmod 644 %build perl Makefile.PL INSTALLDIRS=vendor -make %{?_smp_mflags} +%make_build %check make test @@ -96,7 +94,6 @@ %perl_gen_filelist %files -f %{name}.files -%defattr(-,root,root,755) %doc Changes README %license LICENSE ++++++ Plack-1.0048.tar.gz -> Plack-1.0050.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/Changes new/Plack-1.0050/Changes --- old/Plack-1.0048/Changes 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/Changes 2022-09-05 17:46:46.000000000 +0200 @@ -1,5 +1,19 @@ Go to http://github.com/plack/Plack/issues for the roadmap and known issues. +1.0050 2022-09-05 08:46:44 PDT + [BUG FIXES] + - Revert #660 where POST requests failed when Middleware::Static was used with a code in `path` (#683) + +1.0049 2022-09-01 10:43:42 PDT + [IMPROVEMENTS] + - Fix typos in docs #659 + - Test improvements, including moving from Travis CI to GitHub + - Restrict non-GET/HEAD requests to App::File #662 + - Improved nginx FastCGI example #675 + - Added documentation about port 5000 for MacOS Montery + - Added verify_SSL in Plack::LWPish #677 + - Added 'force' option to IIS6ScriptNameFix #679 + 1.0048 2020-11-29 16:20:00 PST [IMPROVEMENTS] - Updated documentation for cotent_length and content_type #625 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/LICENSE new/Plack-1.0050/LICENSE --- old/Plack-1.0048/LICENSE 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/LICENSE 2022-09-05 17:46:46.000000000 +0200 @@ -292,21 +292,21 @@ - "Package" refers to the collection of files distributed by the Copyright Holder, and derivatives of that collection of files created through - textual modification. + textual modification. - "Standard Version" refers to such a Package if it has not been modified, or has been modified in accordance with the wishes of the Copyright - Holder. + Holder. - "Copyright Holder" is whoever is named in the copyright or copyrights for - the package. + the package. - "You" is you, if you're thinking about copying or distributing this Package. - "Reasonable copying fee" is whatever you can justify on the basis of media cost, duplication charges, time of people involved, and so on. (You will not be required to justify it to the Copyright Holder, but only to the - computing community at large as a market that must bear the fee.) + computing community at large as a market that must bear the fee.) - "Freely Available" means that no fee is charged for the item itself, though there may be fees involved in handling the item. It also means that recipients of the item may redistribute it under the same conditions they - received it. + received it. 1. You may make and give away verbatim copies of the source form of the Standard Version of this Package without restriction, provided that you @@ -373,7 +373,7 @@ 9. THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF -MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE. +MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE. The End diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/MANIFEST new/Plack-1.0050/MANIFEST --- old/Plack-1.0048/MANIFEST 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/MANIFEST 2022-09-05 17:46:46.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.012. +# This file was automatically generated by Dist::Zilla::Plugin::Manifest v6.025. Changes LICENSE MANIFEST @@ -145,7 +145,7 @@ t/Plack-Middleware/cascade/streaming.t t/Plack-Middleware/cgi-bin/cgi_dir.cgi t/Plack-Middleware/cgi-bin/hello.cgi -t/Plack-Middleware/cgi-bin/hello.py +t/Plack-Middleware/cgi-bin/hello.sh t/Plack-Middleware/cgi-bin/hello2.cgi t/Plack-Middleware/cgi-bin/hello3.cgi t/Plack-Middleware/cgi-bin/utf8.cgi diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/META.json new/Plack-1.0050/META.json --- old/Plack-1.0048/META.json 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/META.json 2022-09-05 17:46:46.000000000 +0200 @@ -4,7 +4,7 @@ "Tatsuhiko Miyagawa" ], "dynamic_config" : 0, - "generated_by" : "Dist::Milla version v1.0.20, Dist::Zilla version 6.012, CPAN::Meta::Converter version 2.143240", + "generated_by" : "Dist::Milla version v1.0.21, Dist::Zilla version 6.025, CPAN::Meta::Converter version 2.150010", "license" : [ "perl_5" ], @@ -35,7 +35,7 @@ }, "develop" : { "requires" : { - "Dist::Milla" : "v1.0.20", + "Dist::Milla" : "v1.0.21", "Test::Pod" : "1.41" } }, @@ -105,7 +105,7 @@ "web" : "https://github.com/plack/Plack"; } }, - "version" : "1.0048", + "version" : "1.0050", "x_authority" : "cpan:MIYAGAWA", "x_contributors" : [ "Aaron Trevena <[email protected]>", @@ -135,6 +135,7 @@ "Dagfinn Ilmari Manns\u00e5ker <[email protected]>", "Daisuke Maki <[email protected]>", "Daisuke Murase <[email protected]>", + "Daniel Mita <[email protected]>", "Dave Marr <[email protected]>", "Dave Rolsky <[email protected]>", "David E. Wheeler <[email protected]>", @@ -188,6 +189,7 @@ "Masahiro Chiba <[email protected]>", "Masahiro Nagano <[email protected]>", "Michael G. Schwern <[email protected]>", + "Michael R. Davis <[email protected]>", "Michal Josef \u0160pa\u010dek <[email protected]>", "mickey <[email protected]>", "Narsimham Chelluri <[email protected]>", @@ -224,6 +226,7 @@ "smcmurray <[email protected]>", "Stephen Clouse <[email protected]>", "Stevan Little <[email protected]>", + "Stig Palmquist <[email protected]>", "Stuart A Johnston <[email protected]>", "Takeshi OKURA <[email protected]>", "Tatsuhiko Miyagawa <[email protected]>", @@ -243,8 +246,9 @@ "Yuval Kogman <[email protected]>", "\u5510\u9cf3 <[email protected]>" ], - "x_generated_by_perl" : "v5.20.1", - "x_serialization_backend" : "Cpanel::JSON::XS version 4.09", + "x_generated_by_perl" : "v5.34.1", + "x_serialization_backend" : "Cpanel::JSON::XS version 4.27", + "x_spdx_expression" : "Artistic-1.0-Perl OR GPL-1.0-or-later", "x_static_install" : 1 } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/META.yml new/Plack-1.0050/META.yml --- old/Plack-1.0048/META.yml 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/META.yml 2022-09-05 17:46:46.000000000 +0200 @@ -9,7 +9,7 @@ ExtUtils::MakeMaker: '0' File::ShareDir::Install: '0.06' dynamic_config: 0 -generated_by: 'Dist::Milla version v1.0.20, Dist::Zilla version 6.012, CPAN::Meta::Converter version 2.143240' +generated_by: 'Dist::Milla version v1.0.21, Dist::Zilla version 6.025, CPAN::Meta::Converter version 2.150010' license: perl meta-spec: url: http://module-build.sourceforge.net/META-spec-v1.4.html @@ -47,7 +47,7 @@ bugtracker: https://github.com/plack/Plack/issues homepage: https://github.com/plack/Plack repository: https://github.com/plack/Plack.git -version: '1.0048' +version: '1.0050' x_authority: cpan:MIYAGAWA x_contributors: - 'Aaron Trevena <[email protected]>' @@ -77,6 +77,7 @@ - 'Dagfinn Ilmari Manns??ker <[email protected]>' - 'Daisuke Maki <[email protected]>' - 'Daisuke Murase <[email protected]>' + - 'Daniel Mita <[email protected]>' - 'Dave Marr <[email protected]>' - 'Dave Rolsky <[email protected]>' - 'David E. Wheeler <[email protected]>' @@ -130,6 +131,7 @@ - 'Masahiro Chiba <[email protected]>' - 'Masahiro Nagano <[email protected]>' - 'Michael G. Schwern <[email protected]>' + - 'Michael R. Davis <[email protected]>' - 'Michal Josef ??pa??ek <[email protected]>' - 'mickey <[email protected]>' - 'Narsimham Chelluri <[email protected]>' @@ -166,6 +168,7 @@ - 'smcmurray <[email protected]>' - 'Stephen Clouse <[email protected]>' - 'Stevan Little <[email protected]>' + - 'Stig Palmquist <[email protected]>' - 'Stuart A Johnston <[email protected]>' - 'Takeshi OKURA <[email protected]>' - 'Tatsuhiko Miyagawa <[email protected]>' @@ -184,6 +187,7 @@ - 'Yury Zavarin <[email protected]>' - 'Yuval Kogman <[email protected]>' - '?????? <[email protected]>' -x_generated_by_perl: v5.20.1 +x_generated_by_perl: v5.34.1 x_serialization_backend: 'YAML::Tiny version 1.73' +x_spdx_expression: 'Artistic-1.0-Perl OR GPL-1.0-or-later' x_static_install: 1 diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/Makefile.PL new/Plack-1.0050/Makefile.PL --- old/Plack-1.0048/Makefile.PL 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/Makefile.PL 2022-09-05 17:46:46.000000000 +0200 @@ -1,4 +1,4 @@ -# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.012. +# This file was automatically generated by Dist::Zilla::Plugin::MakeMaker v6.025. use strict; use warnings; @@ -50,7 +50,7 @@ "Test::More" => "0.88", "Test::Requires" => 0 }, - "VERSION" => "1.0048", + "VERSION" => "1.0050", "test" => { "TESTS" => "t/*.t t/HTTP-Message-PSGI/*.t t/HTTP-Server-PSGI/*.t t/Plack-Builder/*.t t/Plack-HTTPParser-PP/*.t t/Plack-Handler/*.t t/Plack-Loader/*.t t/Plack-MIME/*.t t/Plack-Middleware/*.t t/Plack-Middleware/cascade/*.t t/Plack-Middleware/recursive/*.t t/Plack-Middleware/stacktrace/*.t t/Plack-Request/*.t t/Plack-Response/*.t t/Plack-Runner/*.t t/Plack-TempBuffer/*.t t/Plack-Test/*.t t/Plack-Util/*.t" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/App/File.pm new/Plack-1.0050/lib/Plack/App/File.pm --- old/Plack-1.0048/lib/Plack/App/File.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/App/File.pm 2022-09-05 17:46:46.000000000 +0200 @@ -149,7 +149,7 @@ =head1 DESCRIPTION This is a static file server PSGI application, and internally used by -L<Plack::Middleware::Static>. This application serves file from +L<Plack::Middleware::Static>. This application serves files from the document root if the path matches with the local file. Use L<Plack::App::Directory> if you want to list files in the directory as well. @@ -178,7 +178,7 @@ Set the file content type. If not set L<Plack::MIME> will try to detect it based on the file extension or fall back to C<text/plain>. -Can be set to a callback which should work on $_[0] to check full path file +Can be set to a callback which should work on $_[0] to check full path file name. =back @@ -192,5 +192,3 @@ L<Plack::Middleware::Static> L<Plack::App::Directory> =cut - - diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Builder.pm new/Plack-1.0050/lib/Plack/Builder.pm --- old/Plack-1.0048/lib/Plack/Builder.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Builder.pm 2022-09-05 17:46:46.000000000 +0200 @@ -274,7 +274,7 @@ =item * -C<builder { ... }> should normally the last statement of a C<.psgi> +C<builder { ... }> should normally be the last statement of a C<.psgi> file, because the return value of C<builder> is the application that is actually executed. diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Handler/FCGI.pm new/Plack-1.0050/lib/Plack/Handler/FCGI.pm --- old/Plack-1.0048/lib/Plack/Handler/FCGI.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Handler/FCGI.pm 2022-09-05 17:46:46.000000000 +0200 @@ -387,7 +387,7 @@ should mangle this configuration to set the path to C<SCRIPT_NAME> and the rest of the path in C<PATH_INFO>. -See L<http://wiki.nginx.org/NginxFcgiExample> for more details. +See L<https://www.nginx.com/resources/wiki/start/topics/examples/fastcgiexample/> for more details. =head3 Apache mod_fastcgi diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/LWPish.pm new/Plack-1.0050/lib/Plack/LWPish.pm --- old/Plack-1.0048/lib/Plack/LWPish.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/LWPish.pm 2022-09-05 17:46:46.000000000 +0200 @@ -8,7 +8,7 @@ sub new { my $class = shift; my $self = bless {}, $class; - $self->{http} = @_ == 1 ? $_[0] : HTTP::Tiny->new(@_); + $self->{http} = @_ == 1 ? $_[0] : HTTP::Tiny->new(verify_SSL => 1, @_); $self; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Loader.pm new/Plack-1.0050/lib/Plack/Loader.pm --- old/Plack-1.0048/lib/Plack/Loader.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Loader.pm 2022-09-05 17:46:46.000000000 +0200 @@ -80,7 +80,7 @@ sub env { \%ENV } sub run { - my($self, $server, $builder) = @_; + my($self, $server) = @_; $server->run($self->{app}); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Middleware/IIS6ScriptNameFix.pm new/Plack-1.0050/lib/Plack/Middleware/IIS6ScriptNameFix.pm --- old/Plack-1.0048/lib/Plack/Middleware/IIS6ScriptNameFix.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Middleware/IIS6ScriptNameFix.pm 2022-09-05 17:46:46.000000000 +0200 @@ -2,11 +2,12 @@ use strict; use parent 'Plack::Middleware'; +use Plack::Util::Accessor qw(force); sub call { my($self, $env) = @_; - if ($env->{SERVER_SOFTWARE} && $env->{SERVER_SOFTWARE} =~ /IIS\/[6-9]\.[0-9]/) { + if ($self->force || ($env->{SERVER_SOFTWARE} && $env->{SERVER_SOFTWARE} =~ /IIS\/[6-9]\.[0-9]/)) { my @script_name = split(m!/!, $env->{PATH_INFO}); my @path_translated = split(m!/|\\\\?!, $env->{PATH_TRANSLATED}); my @path_info; @@ -50,6 +51,23 @@ This middleware fixes wrong C<SCRIPT_NAME> and C<PATH_INFO> set by IIS6. +=head1 OPTIONS + +=over 4 + +=item force + +By default, this middleware checks if C<SERVER_SOFTWARE> PSGI environment +matches what Microsoft IIS server 6-9 would set for FastCGI. By setting C<force> +to true (1), this middleware always applies the fix, regardless of the +C<SERVER_SOFTWARE> string. + +Use this option if the environment is broken similar to IIS, or if the IIS is +updated and the regular expression in this module doesn't match any more +e.g. you're running IIS 10. + +=back + =head1 AUTHORS Florian Ragwitz diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Request.pm new/Plack-1.0050/lib/Plack/Request.pm --- old/Plack-1.0048/lib/Plack/Request.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Request.pm 2022-09-05 17:46:46.000000000 +0200 @@ -2,7 +2,7 @@ use strict; use warnings; use 5.008_001; -our $VERSION = '1.0048'; +our $VERSION = '1.0050'; use HTTP::Headers::Fast; use Carp (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack/Response.pm new/Plack-1.0050/lib/Plack/Response.pm --- old/Plack-1.0048/lib/Plack/Response.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack/Response.pm 2022-09-05 17:46:46.000000000 +0200 @@ -1,7 +1,7 @@ package Plack::Response; use strict; use warnings; -our $VERSION = '1.0048'; +our $VERSION = '1.0050'; use Plack::Util::Accessor qw(body status); use Carp (); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/lib/Plack.pm new/Plack-1.0050/lib/Plack.pm --- old/Plack-1.0048/lib/Plack.pm 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/lib/Plack.pm 2022-09-05 17:46:46.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; use 5.008_001; -our $VERSION = '1.0048'; +our $VERSION = '1.0050'; 1; __END__ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/script/plackup new/Plack-1.0050/script/plackup --- old/Plack-1.0048/script/plackup 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/script/plackup 2022-09-05 17:46:46.000000000 +0200 @@ -119,6 +119,9 @@ Binds to a TCP port. Defaults to 5000. This option is only valid for servers which support TCP sockets. +Note: default port 5000 may conflict with AirPlay server on MacOS 12 (Monterey) +or later. + =item -s, --server, the C<PLACK_SERVER> environment variable Selects a specific server implementation to run on. When provided, the C<-s> or diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/t/Plack-Middleware/cgi-bin/hello.py new/Plack-1.0050/t/Plack-Middleware/cgi-bin/hello.py --- old/Plack-1.0048/t/Plack-Middleware/cgi-bin/hello.py 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/t/Plack-Middleware/cgi-bin/hello.py 1970-01-01 01:00:00.000000000 +0100 @@ -1,10 +0,0 @@ -#!/usr/bin/python -from __future__ import print_function -import os - -print("Content-Type: text/plain") -print -for item in ([ "foo", "bar" ]): - print("Hello " + item + ". ") - -print("QUERY_STRING is " + os.environ['QUERY_STRING']) diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/t/Plack-Middleware/cgi-bin/hello.sh new/Plack-1.0050/t/Plack-Middleware/cgi-bin/hello.sh --- old/Plack-1.0048/t/Plack-Middleware/cgi-bin/hello.sh 1970-01-01 01:00:00.000000000 +0100 +++ new/Plack-1.0050/t/Plack-Middleware/cgi-bin/hello.sh 2022-09-05 17:46:46.000000000 +0200 @@ -0,0 +1,6 @@ +#!/bin/sh +echo "Content-Type: text/plain" +echo + +echo "Hello foo" +echo "QUERY_STRING is $QUERY_STRING" diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/t/Plack-Middleware/cgibin_exec.t new/Plack-1.0050/t/Plack-Middleware/cgibin_exec.t --- old/Plack-1.0048/t/Plack-Middleware/cgibin_exec.t 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/t/Plack-Middleware/cgibin_exec.t 2022-09-05 17:46:46.000000000 +0200 @@ -7,16 +7,12 @@ use HTTP::Request::Common; use Plack::App::CGIBin; -unless (-e "/usr/bin/python" && -x _) { - plan skip_all => "You don't have /usr/bin/python"; -} - my $app = Plack::App::CGIBin->new(root => "t/Plack-Middleware/cgi-bin")->to_app; test_psgi app => $app, client => sub { my $cb = shift; - my $res = $cb->(GET "http://localhost/hello.py?name=foo";); + my $res = $cb->(GET "http://localhost/hello.sh?name=foo";); is $res->code, 200; like $res->content, qr/Hello foo/; like $res->content, qr/QUERY_STRING is name=foo/; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/Plack-1.0048/t/Plack-Middleware/iis6_script_name_fix.t new/Plack-1.0050/t/Plack-Middleware/iis6_script_name_fix.t --- old/Plack-1.0048/t/Plack-Middleware/iis6_script_name_fix.t 2020-11-30 01:20:06.000000000 +0100 +++ new/Plack-1.0050/t/Plack-Middleware/iis6_script_name_fix.t 2022-09-05 17:46:46.000000000 +0200 @@ -48,21 +48,32 @@ ); sub test_fix { - my ($input_env) = @_; + my ($input_env, %options) = @_; my $mangled_env; Plack::Middleware::IIS6ScriptNameFix->wrap(sub { my ($env) = @_; $mangled_env = $env; return [ 200, ['Content-Type' => 'text/plain'], [''] ]; - })->($input_env); + }, %options)->($input_env); return $mangled_env; } -my $fixed_env = test_fix({ %env }); +{ + my $fixed_env = test_fix({ %env }); + + is($fixed_env->{PATH_INFO}, '//blurb', 'check PATH_INFO'); + is($fixed_env->{SCRIPT_NAME}, '/koo', 'check SCRIPT_NAME'); +} + +{ + local $env{SERVER_SOFTWARE} = "Microsoft-IIS/10"; + my $fixed_env = test_fix({ %env }, force => 1); + + is($fixed_env->{PATH_INFO}, '//blurb', 'check PATH_INFO'); + is($fixed_env->{SCRIPT_NAME}, '/koo', 'check SCRIPT_NAME'); +} -is($fixed_env->{PATH_INFO}, '//blurb', 'check PATH_INFO'); -is($fixed_env->{SCRIPT_NAME}, '/koo', 'check SCRIPT_NAME'); done_testing;
