Script 'mail_helper' called by obssrc Hello community, here is the log from the commit of package perl-CGI for openSUSE:Factory checked in at 2023-10-13 23:13:43 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Comparing /work/SRC/openSUSE:Factory/perl-CGI (Old) and /work/SRC/openSUSE:Factory/.perl-CGI.new.20540 (New) ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
Package is "perl-CGI" Fri Oct 13 23:13:43 2023 rev:28 rq:1117046 version:4.590.0 Changes: -------- --- /work/SRC/openSUSE:Factory/perl-CGI/perl-CGI.changes 2023-05-04 17:09:24.739956678 +0200 +++ /work/SRC/openSUSE:Factory/.perl-CGI.new.20540/perl-CGI.changes 2023-10-13 23:13:50.977227616 +0200 @@ -1,0 +2,13 @@ +Tue Oct 3 03:06:06 UTC 2023 - Tina Müller <timueller+p...@suse.de> + +- updated to 4.59 + see /usr/share/doc/packages/perl-CGI/Changes + + 4.59 2023-10-02 + [ FIX ] + - Bring VERSION values inline + 4.58 2023-10-02 + [ FIX ] + - Update cookie expires date format (GH #258 , thanks to robbiebow) + +------------------------------------------------------------------- Old: ---- CGI-4.57.tar.gz New: ---- CGI-4.59.tar.gz ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ Other differences: ------------------ ++++++ perl-CGI.spec ++++++ --- /var/tmp/diff_new_pack.nzD2ZX/_old 2023-10-13 23:13:52.109268675 +0200 +++ /var/tmp/diff_new_pack.nzD2ZX/_new 2023-10-13 23:13:52.109268675 +0200 @@ -18,12 +18,13 @@ %define cpan_name CGI Name: perl-CGI -Version: 4.57 +Version: 4.590.0 Release: 0 +%define cpan_version 4.59 License: Artistic-2.0 Summary: Handle Common Gateway Interface requests and responses URL: https://metacpan.org/release/%{cpan_name} -Source0: https://cpan.metacpan.org/authors/id/L/LE/LEEJO/%{cpan_name}-%{version}.tar.gz +Source0: https://cpan.metacpan.org/authors/id/L/LE/LEEJO/%{cpan_name}-%{cpan_version}.tar.gz Source1: cpanspec.yml BuildArch: noarch BuildRequires: perl @@ -37,6 +38,17 @@ Requires: perl(File::Temp) >= 0.17 Requires: perl(HTML::Entities) >= 3.69 Requires: perl(parent) >= 0.225 +Provides: perl(CGI) +Provides: perl(CGI::Carp) = 4.590.0 +Provides: perl(CGI::Cookie) +Provides: perl(CGI::File::Temp) = 4.590.0 +Provides: perl(CGI::HTML::Functions) +Provides: perl(CGI::MultipartBuffer) +Provides: perl(CGI::Pretty) = 4.590.0 +Provides: perl(CGI::Push) +Provides: perl(CGI::Util) = 4.590.0 +Provides: perl(Fh) = 4.590.0 +%define __perllib_provides /bin/true %{perl_requires} %description @@ -54,7 +66,7 @@ however is has now been removed from the perl core... %prep -%autosetup -n %{cpan_name}-%{version} +%autosetup -n %{cpan_name}-%{cpan_version} find . -type f ! -path "*/t/*" ! -name "*.pl" ! -path "*/bin/*" ! -path "*/script/*" ! -path "*/scripts/*" ! -name "configure" -print0 | xargs -0 chmod 644 ++++++ CGI-4.57.tar.gz -> CGI-4.59.tar.gz ++++++ diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/Changes new/CGI-4.59/Changes --- old/CGI-4.57/Changes 2023-05-02 15:12:42.000000000 +0200 +++ new/CGI-4.59/Changes 2023-10-02 09:12:05.000000000 +0200 @@ -1,3 +1,13 @@ +4.59 2023-10-02 + + [ FIX ] + - Bring VERSION values inline + +4.58 2023-10-02 + + [ FIX ] + - Update cookie expires date format (GH #258 , thanks to robbiebow) + 4.57 2023-05-01 [ DOCUMENTATION ] diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/META.json new/CGI-4.59/META.json --- old/CGI-4.57/META.json 2023-05-02 15:14:17.000000000 +0200 +++ new/CGI-4.59/META.json 2023-10-02 09:14:04.000000000 +0200 @@ -77,6 +77,6 @@ "web" : "https://github.com/leejo/CGI.pm"; } }, - "version" : "4.57", + "version" : "4.59", "x_serialization_backend" : "JSON::PP version 4.06" } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/META.yml new/CGI-4.59/META.yml --- old/CGI-4.57/META.yml 2023-05-02 15:14:17.000000000 +0200 +++ new/CGI-4.59/META.yml 2023-10-02 09:14:04.000000000 +0200 @@ -46,5 +46,5 @@ homepage: https://metacpan.org/module/CGI license: http://dev.perl.org/licenses/ repository: https://github.com/leejo/CGI.pm -version: '4.57' +version: '4.59' x_serialization_backend: 'CPAN::Meta::YAML version 0.018' diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/Carp.pm new/CGI-4.59/lib/CGI/Carp.pm --- old/CGI-4.57/lib/CGI/Carp.pm 2023-05-02 14:05:04.000000000 +0200 +++ new/CGI-4.59/lib/CGI/Carp.pm 2023-10-02 09:12:35.000000000 +0200 @@ -326,7 +326,7 @@ $main::SIG{__WARN__}=\&CGI::Carp::warn; -$CGI::Carp::VERSION = '4.57'; +$CGI::Carp::VERSION = '4.59'; $CGI::Carp::CUSTOM_MSG = undef; $CGI::Carp::DIE_HANDLER = undef; $CGI::Carp::TO_BROWSER = 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/Cookie.pm new/CGI-4.59/lib/CGI/Cookie.pm --- old/CGI-4.57/lib/CGI/Cookie.pm 2023-03-03 09:40:12.000000000 +0100 +++ new/CGI-4.59/lib/CGI/Cookie.pm 2023-10-02 09:11:30.000000000 +0200 @@ -3,7 +3,7 @@ use strict; use warnings; -our $VERSION='4.56'; +our $VERSION='4.59'; use CGI::Util qw(rearrange unescape escape); use overload '""' => \&as_string, 'cmp' => \&compare, 'fallback' => 1; @@ -209,7 +209,7 @@ sub expires { my ( $self, $expires ) = @_; - $self->{'expires'} = CGI::Util::expires($expires,'cookie') if defined $expires; + $self->{'expires'} = CGI::Util::expires($expires) if defined $expires; return $self->{'expires'}; } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/File/Temp.pm new/CGI-4.59/lib/CGI/File/Temp.pm --- old/CGI-4.57/lib/CGI/File/Temp.pm 2023-05-02 14:05:23.000000000 +0200 +++ new/CGI-4.59/lib/CGI/File/Temp.pm 2023-10-02 09:12:41.000000000 +0200 @@ -3,7 +3,7 @@ # you use it directly and your code breaks horribly. package CGI::File::Temp; -$CGI::File::Temp::VERSION = '4.57'; +$CGI::File::Temp::VERSION = '4.59'; use parent File::Temp; use parent Fh; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/Pretty.pm new/CGI-4.59/lib/CGI/Pretty.pm --- old/CGI-4.57/lib/CGI/Pretty.pm 2023-05-02 14:05:26.000000000 +0200 +++ new/CGI-4.59/lib/CGI/Pretty.pm 2023-10-02 09:12:43.000000000 +0200 @@ -5,7 +5,7 @@ use CGI (); -$CGI::Pretty::VERSION = '4.57'; +$CGI::Pretty::VERSION = '4.59'; $CGI::DefaultClass = __PACKAGE__; @CGI::Pretty::ISA = qw( CGI ); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/Push.pm new/CGI-4.59/lib/CGI/Push.pm --- old/CGI-4.57/lib/CGI/Push.pm 2023-05-02 14:05:29.000000000 +0200 +++ new/CGI-4.59/lib/CGI/Push.pm 2023-10-02 09:12:45.000000000 +0200 @@ -5,7 +5,7 @@ use warnings; #/; -$CGI::Push::VERSION='4.57'; +$CGI::Push::VERSION='4.59'; use CGI; use CGI::Util 'rearrange'; @ISA = ('CGI'); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI/Util.pm new/CGI-4.59/lib/CGI/Util.pm --- old/CGI-4.57/lib/CGI/Util.pm 2023-03-03 09:40:25.000000000 +0100 +++ new/CGI-4.59/lib/CGI/Util.pm 2023-10-02 09:12:47.000000000 +0200 @@ -5,7 +5,7 @@ our @EXPORT_OK = qw(rearrange rearrange_header make_attributes unescape escape expires ebcdic2ascii ascii2ebcdic); -our $VERSION = '4.56'; +our $VERSION = '4.59'; our $_EBCDIC = "\t" ne "\011"; @@ -244,8 +244,7 @@ # cookies and HTTP headers. (They differ, unfortunately.) # Thanks to Mark Fisher for this. sub expires { - my($time,$format) = @_; - $format ||= 'http'; + my $time = shift; my(@MON)=qw/Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec/; my(@WDAY) = qw/Sun Mon Tue Wed Thu Fri Sat/; @@ -254,13 +253,9 @@ $time = expire_calc($time); return $time unless $time =~ /^\d+$/; - # make HTTP/cookie date string from GMT'ed time - # (cookies use '-' as date separator, HTTP uses ' ') - my($sc) = ' '; - $sc = '-' if $format eq "cookie"; my($sec,$min,$hour,$mday,$mon,$year,$wday) = gmtime($time); $year += 1900; - return sprintf("%s, %02d$sc%s$sc%04d %02d:%02d:%02d GMT", + return sprintf("%s, %02d %s %04d %02d:%02d:%02d GMT", $WDAY[$wday],$mday,$MON[$mon],$year,$hour,$min,$sec); } diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/CGI.pm new/CGI-4.59/lib/CGI.pm --- old/CGI-4.57/lib/CGI.pm 2023-05-02 14:05:01.000000000 +0200 +++ new/CGI-4.59/lib/CGI.pm 2023-10-02 09:12:30.000000000 +0200 @@ -7,7 +7,7 @@ use warnings; #/; -$CGI::VERSION='4.57'; +$CGI::VERSION='4.59'; use CGI::Util qw(rearrange rearrange_header make_attributes unescape escape expires ebcdic2ascii ascii2ebcdic); @@ -1607,9 +1607,9 @@ # if the user indicates an expiration time, then we need # both an Expires and a Date header (so that the browser is # uses OUR clock) - push(@header,"Expires: " . expires($expires,'http')) + push(@header,"Expires: " . expires($expires)) if $expires; - push(@header,"Date: " . expires(0,'http')) if $expires || $cookie || $nph; + push(@header,"Date: " . expires(0)) if $expires || $cookie || $nph; push(@header,"Pragma: no-cache") if $self->cache(); push(@header,"Content-Disposition: attachment; filename=\"$attachment\"") if $attachment; push(@header,map {ucfirst $_} @other); @@ -2761,7 +2761,7 @@ # -path -> paths for which this cookie is valid (optional) # -domain -> internet domain in which this cookie is valid (optional) # -secure -> if true, cookie only passed through secure channel (optional) -# -expires -> expiry date in format Wdy, DD-Mon-YYYY HH:MM:SS GMT (optional) +# -expires -> expiry date in format Wdy, DD Mon YYYY HH:MM:SS GMT (optional) #### sub cookie { my($self,@p) = self_or_default(@_); diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/lib/Fh.pm new/CGI-4.59/lib/Fh.pm --- old/CGI-4.57/lib/Fh.pm 2023-05-02 14:05:33.000000000 +0200 +++ new/CGI-4.59/lib/Fh.pm 2023-10-02 09:12:49.000000000 +0200 @@ -5,6 +5,6 @@ use strict; use warnings; -$Fh::VERSION = '4.57'; +$Fh::VERSION = '4.59'; 1; diff -urN '--exclude=CVS' '--exclude=.cvsignore' '--exclude=.svn' '--exclude=.svnignore' old/CGI-4.57/t/cookie.t new/CGI-4.59/t/cookie.t --- old/CGI-4.57/t/cookie.t 2023-03-03 09:38:40.000000000 +0100 +++ new/CGI-4.59/t/cookie.t 2023-10-02 09:00:39.000000000 +0200 @@ -163,7 +163,7 @@ is(ref($c), 'CGI::Cookie', 'new returns objects of correct type'); is($c->name , 'foo', 'name is correct'); is($c->value , 'bar', 'value is correct'); - like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires in correct format'); + like($c->expires, '/^[a-z]{3},\s*\d{2}\s[a-z]{3}\s\d{4}/i', 'expires in correct format'); is($c->domain , '.capricorn.com', 'domain is correct'); is($c->path , '/cgi-bin/database', 'path is correct'); ok($c->secure , 'secure attribute is set'); @@ -357,9 +357,9 @@ is($c->value, 'Gerbil', 'value now returns updated value'); my $exp = $c->expires; - like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires is correct'); - like($c->expires('+12h'), '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires is set correctly'); - like($c->expires, '/^[a-z]{3},\s*\d{2}-[a-z]{3}-\d{4}/i', 'expires now returns updated value'); + like($c->expires, '/^[a-z]{3},\s*\d{2}\s[a-z]{3}\s\d{4}/i', 'expires is correct'); + like($c->expires('+12h'), '/^[a-z]{3},\s*\d{2}\s[a-z]{3}\s\d{4}/i', 'expires is set correctly'); + like($c->expires, '/^[a-z]{3},\s*\d{2}\s[a-z]{3}\s\d{4}/i', 'expires now returns updated value'); isnt($c->expires, $exp, "Expiry time has changed"); is($c->domain, '.pie-shop.com', 'domain is correct'); @@ -398,7 +398,7 @@ MAX_AGE: { my $cookie = CGI::Cookie->new( -name=>'a', value=>'b', '-expires' => 'now',); - is $cookie->expires, 'Thu, 01-Jan-1970 00:01:40 GMT', 'expires is correct'; + is $cookie->expires, 'Thu, 01 Jan 1970 00:01:40 GMT', 'expires is correct'; is $cookie->max_age => undef, 'max-age is undefined when setting expires'; $cookie = CGI::Cookie->new( -name=>'a', 'value'=>'b' );
