smeserver/perl-CGI-Persistent
6
0
Fork 0
Code Issues Pull Requests Packages Projects Releases 1 Wiki Activity

* Wed Jan 15 2025 Jean-Philippe Pialasse <jpp@koozali.org> 1.11-2.sme

Browse Source 
- fix warning CGI::param called in list context  [SME: 12788]
This commit is contained in:
Jean-Philippe Pialasse 2025-01-15 22:51:22 -05:00
parent 73ac41c40a
commit 929569d83e
3 changed files with 27 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
contriborbase
View File

@ -1 +0,0 @@
sme10

21
perl-CGI-Persistent-1.11-Fetching.patch Normal file
View File

@ -0,0 +1,21 @@
diff -Nur CGI-Persistent-1.11.old/lib/CGI/Persistent.pm CGI-Persistent-1.11/lib/CGI/Persistent.pm
--- CGI-Persistent-1.11.old/lib/CGI/Persistent.pm 2008-07-05 15:21:00.000000000 -0400
+++ CGI-Persistent-1.11/lib/CGI/Persistent.pm 2025-01-15 22:47:47.621534307 -0500
@@ -64,7 +64,7 @@
sub delete {
my ( $self, $param ) = @_;
- my $fn = join "/", ($self->{sessiondir},$self->param( '.id' ));
+ my $fn = join "/", ($self->{sessiondir},scalar $self->param( '.id' ));
my $po = new Persistence::Object::Simple __Fn => $fn;
delete $po->{ $param }; $po->commit ();
$self->SUPER::delete ( $param ); # delete, is like, overloaded.
@@ -74,7 +74,7 @@
sub delete_all {
my ( $self ) = shift;
- $fn = join "/", ($self->{sessiondir},$self->param( '.id' ));
+ $fn = join "/", ($self->{sessiondir},scalar $self->param( '.id' ));
my $po = new Persistence::Object::Simple __Fn => $fn;
$po->expire;
$self->SUPER::delete_all ();

7
perl-CGI-Persistent.spec
View File

@ -1,11 +1,12 @@
Name: perl-CGI-Persistent
Version: 1.11
Release: 1%{?dist}
Release: 2%{?dist}
Summary: CGI::Persistent Perl module
License: CHECK(GPL+ or Artistic)
Group: Development/Libraries
URL: http://search.cpan.org/dist/CGI-Persistent/
Source0: http://www.cpan.org/authors/id/V/VI/VIPUL/CGI-Persistent-%{version}.tar.gz
Patch0: perl-CGI-Persistent-1.11-Fetching.patch
BuildRoot: %{_tmppath}/%{name}-%{version}-%{release}-root-%(%{__id_u} -n)
BuildArch: noarch
BuildRequires: perl(ExtUtils::MakeMaker)
@ -24,6 +25,7 @@ http://localhost/somedir/roach.cgi
%prep
%setup -q -n CGI-Persistent-%{version}
%patch0 -p1
%build
%{__perl} Makefile.PL INSTALLDIRS=vendor
@ -52,6 +54,9 @@ rm -rf $RPM_BUILD_ROOT
%{_mandir}/man3/*
%changelog
* Wed Jan 15 2025 Jean-Philippe Pialasse <jpp@koozali.org> 1.11-2.sme
- fix warning CGI::param called in list context [SME: 12788]
* Fri Jul 14 2023 BogusDateBot
- Eliminated rpmbuild "bogus date" warnings due to inconsistent weekday,
by assuming the date is correct and changing the weekday.