--- libhttp-response-encoding-perl-0.05.orig/debian/control +++ libhttp-response-encoding-perl-0.05/debian/control @@ -0,0 +1,20 @@ +Source: libhttp-response-encoding-perl +Section: perl +Priority: optional +Build-Depends: debhelper (>= 7.0.8), quilt (>= 0.46-7) +Build-Depends-Indep: perl (>= 5.6.10-12), libwww-perl (>= 5.827), + libtest-pod-perl, libtest-pod-coverage-perl +Maintainer: Debian Perl Group +Uploaders: Rene Mayorga , + gregor herrmann +Standards-Version: 3.8.2 +Homepage: http://search.cpan.org/dist/HTTP-Response-Encoding/ +Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libhttp-response-encoding-perl/ +Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libhttp-response-encoding-perl/ + +Package: libhttp-response-encoding-perl +Architecture: all +Depends: ${perl:Depends}, ${misc:Depends}, libwww-perl (>= 5.827) +Description: set of encoding() methods for HTTP::Response + HTTP::Response:Enconding adds methods to better handle encoded responses from + HTTP::Response --- libhttp-response-encoding-perl-0.05.orig/debian/copyright +++ libhttp-response-encoding-perl-0.05/debian/copyright @@ -0,0 +1,29 @@ +Format-Specification: + http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=196 +Upstream-Maintainer: Dan Kogai +Upstream-Source: http://search.cpan.org/dist/HTTP-Response-Encoding/ +Upstream-Name: HTTP-Response-Encoding + +Files: * +Copyright: 2007 Dan Kogai, all rights reserved. +License-Alias: Perl +License: Artistic | GPL-1+ + +Files: debian/* +Copyright: 2008-2009 various members of the Debian Perl Group, cf + debian/changelog +License: Artistic | GPL-1+ + +License: Artistic + This program is free software; you can redistribute it and/or modify + it under the terms of the Artistic License, which comes with Perl. + On Debian GNU/Linux systems, the complete text of the Artistic License + can be found in /usr/share/common-licenses/Artistic + +License: GPL-1+ + This program is free software; you can redistribute it and/or modify + it under the terms of the GNU General Public License as published by + the Free Software Foundation; either version 1, or (at your option) + any later version. + On Debian GNU/Linux systems, the complete text of the GNU General + Public License can be found in `/usr/share/common-licenses/GPL' --- libhttp-response-encoding-perl-0.05.orig/debian/watch +++ libhttp-response-encoding-perl-0.05/debian/watch @@ -0,0 +1,3 @@ +version=3 +# URL to the package page followed by a regex to search +http://search.cpan.org/dist/HTTP-Response-Encoding/ .*/HTTP-Response-Encoding-v?(\d[\d.-]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip)$ --- libhttp-response-encoding-perl-0.05.orig/debian/compat +++ libhttp-response-encoding-perl-0.05/debian/compat @@ -0,0 +1 @@ +7 --- libhttp-response-encoding-perl-0.05.orig/debian/changelog +++ libhttp-response-encoding-perl-0.05/debian/changelog @@ -0,0 +1,27 @@ +libhttp-response-encoding-perl (0.05-2) unstable; urgency=low + + [ gregor herrmann ] + * debian/control: Changed: Switched Vcs-Browser field to ViewSVN + (source stanza). + + [ Rene Mayorga ] + * debian/control: update my email address. + + [ Nathan Handler ] + * debian/watch: Update to ignore development releases. + + [ gregor herrmann ] + * Add patch to make the module work with libwww-perl >= 5.827; add quilt + framework and adjust build and runtime dependencies (closes: #536648). + * Set Standards-Version to 3.8.2 (no changes). + * Add /me to Uploaders. + * debian/copyright: update years of packaging copyright. + * debian/control: wrap long lines and make synopsis a noun phrase. + + -- gregor herrmann Mon, 13 Jul 2009 01:11:36 +0200 + +libhttp-response-encoding-perl (0.05-1) unstable; urgency=low + + * Initial Release. Closes: #503848 + + -- Rene Mayorga Tue, 28 Oct 2008 11:24:01 -0600 --- libhttp-response-encoding-perl-0.05.orig/debian/rules +++ libhttp-response-encoding-perl-0.05/debian/rules @@ -0,0 +1,3 @@ +#!/usr/bin/make -f +%: + dh --with quilt $@ --- libhttp-response-encoding-perl-0.05.orig/debian/patches/lwp5827.patch +++ libhttp-response-encoding-perl-0.05/debian/patches/lwp5827.patch @@ -0,0 +1,39 @@ +Bugs-Debian: #536648 +Bugs-CPAN: RT#47033 +Patch-Origin: https://rt.cpan.org/Ticket/Attachment/620300/315414/lwp5827.patch +Description: adjust to libwww-perl >= 5.827 +Reviewed-By: gregor herrmann + +--- a/Makefile.PL ++++ b/Makefile.PL +@@ -12,6 +12,7 @@ + PREREQ_PM => { + 'Encode' => 2.00, + 'Test::More' => 0, ++ 'HTTP::Message' => 5.827, + 'HTTP::Response' => 0, + }, + dist => { COMPRESS => 'gzip -9f', SUFFIX => 'gz', }, +--- a/lib/HTTP/Response/Encoding.pm ++++ b/lib/HTTP/Response/Encoding.pm +@@ -5,11 +5,7 @@ + + sub HTTP::Response::charset { + my $self = shift; +- return $self->{__charset} if exists $self->{__charset}; +- my $content_type = $self->headers->header('Content-Type'); +- return unless $content_type; +- $content_type =~ /charset=([A-Za-z0-9_\-]+)/io; +- $self->{__charset} = $1 || undef; ++ return $self->content_charset; + } + + sub HTTP::Response::encoder { +--- a/t/01-file.t ++++ b/t/01-file.t +@@ -55,4 +55,4 @@ + $uri->path(File::Spec->catfile($cwd, "t", "t-null.html")); + my $res = $ua->get($uri); + die unless $res->is_success; +-is $res->encoding, undef, "res->encoding eq undef"; ++is $res->encoding, "ascii", "res->encoding is ascii"; --- libhttp-response-encoding-perl-0.05.orig/debian/patches/series +++ libhttp-response-encoding-perl-0.05/debian/patches/series @@ -0,0 +1 @@ +lwp5827.patch