[SCM] Debian packaging of libcgi-pm-perl branch, master, updated. debian/3.61-2-15-g9c0b4cf
gregor herrmann
gregoa at debian.org
Fri Jun 7 21:04:07 UTC 2013
The following commit has been merged in the master branch:
commit 825fadd7f4e2da7519c384b50c775f2e41d9a301
Author: gregor herrmann <gregoa at debian.org>
Date: Fri Jun 7 22:42:56 2013 +0200
Drop patch 0001-CR-escaping-for-P3P-and-Set-Cookie-headers.patch
(applied upstream).
diff --git a/debian/patches/0001-CR-escaping-for-P3P-and-Set-Cookie-headers.patch b/debian/patches/0001-CR-escaping-for-P3P-and-Set-Cookie-headers.patch
deleted file mode 100644
index 6d398ec..0000000
--- a/debian/patches/0001-CR-escaping-for-P3P-and-Set-Cookie-headers.patch
+++ /dev/null
@@ -1,67 +0,0 @@
-From d5f9eaeea977edd24b3e6fdec7871ab254733ba4 Mon Sep 17 00:00:00 2001
-From: Ryo Anazawa <anazawa at cpan.org>
-Date: Wed, 14 Nov 2012 09:47:32 +0900
-Subject: [PATCH] CR escaping for P3P and Set-Cookie headers
-
----
- lib/CGI.pm | 24 ++++++++++++------------
- t/headers.t | 6 ++++++
- 2 files changed, 18 insertions(+), 12 deletions(-)
-
---- a/lib/CGI.pm
-+++ b/lib/CGI.pm
-@@ -1501,8 +1501,17 @@
- 'EXPIRES','NPH','CHARSET',
- 'ATTACHMENT','P3P'], at p);
-
-+ # Since $cookie and $p3p may be array references,
-+ # we must stringify them before CR escaping is done.
-+ my @cookie;
-+ for (ref($cookie) eq 'ARRAY' ? @{$cookie} : $cookie) {
-+ my $cs = UNIVERSAL::isa($_,'CGI::Cookie') ? $_->as_string : $_;
-+ push(@cookie,$cs) if defined $cs and $cs ne '';
-+ }
-+ $p3p = join ' ',@$p3p if ref($p3p) eq 'ARRAY';
-+
- # CR escaping for values, per RFC 822
-- for my $header ($type,$status,$cookie,$target,$expires,$nph,$charset,$attachment,$p3p, at other) {
-+ for my $header ($type,$status, at cookie,$target,$expires,$nph,$charset,$attachment,$p3p, at other) {
- if (defined $header) {
- # From RFC 822:
- # Unfolding is accomplished by regarding CRLF immediately
-@@ -1546,18 +1555,9 @@
-
- push(@header,"Status: $status") if $status;
- push(@header,"Window-Target: $target") if $target;
-- if ($p3p) {
-- $p3p = join ' ',@$p3p if ref($p3p) eq 'ARRAY';
-- push(@header,qq(P3P: policyref="/w3c/p3p.xml", CP="$p3p"));
-- }
-+ push(@header,"P3P: policyref=\"/w3c/p3p.xml\", CP=\"$p3p\"") if $p3p;
- # push all the cookies -- there may be several
-- if ($cookie) {
-- my(@cookie) = ref($cookie) && ref($cookie) eq 'ARRAY' ? @{$cookie} : $cookie;
-- for (@cookie) {
-- my $cs = UNIVERSAL::isa($_,'CGI::Cookie') ? $_->as_string : $_;
-- push(@header,"Set-Cookie: $cs") if $cs ne '';
-- }
-- }
-+ push(@header,map {"Set-Cookie: $_"} @cookie);
- # 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)
---- a/t/headers.t
-+++ b/t/headers.t
-@@ -22,6 +22,12 @@
- like $cgi->header( -type => "text/html".$CGI::CRLF." evil: stuff " ),
- qr#Content-Type: text/html evil: stuff#, 'known header, with leading and trailing whitespace on the continuation line';
-
-+eval { $cgi->header( -p3p => ["foo".$CGI::CRLF."bar"] ) };
-+like($@,qr/contains a newline/,'P3P header with CRLF embedded blows up');
-+
-+eval { $cgi->header( -cookie => ["foo".$CGI::CRLF."bar"] ) };
-+like($@,qr/contains a newline/,'Set-Cookie header with CRLF embedded blows up');
-+
- eval { $cgi->header( -foobar => "text/html".$CGI::CRLF."evil: stuff" ) };
- like($@,qr/contains a newline/,'unknown header with CRLF embedded blows up');
-
diff --git a/debian/patches/series b/debian/patches/series
index 8de85fc..e27d884 100644
--- a/debian/patches/series
+++ b/debian/patches/series
@@ -1,2 +1 @@
man-cgi-fast.patch
-0001-CR-escaping-for-P3P-and-Set-Cookie-headers.patch
--
Debian packaging of libcgi-pm-perl
More information about the Pkg-perl-cvs-commits
mailing list