--- libfile-slurp-perl-9999.16.orig/debian/README.source +++ libfile-slurp-perl-9999.16/debian/README.source @@ -0,0 +1,38 @@ +This package uses dpatch to manage all modifications to the upstream +source. Changes are stored in the source package as diffs in +debian/patches and applied during the build. + +To get the fully patched source after unpacking the source package, cd +to the root level of the source package and run: + + debian/rules patch + +Removing a patch is as simple as removing its entry from the +debian/patches/00list file, and please also remove the patch file +itself. + +Creating a new patch is done with "dpatch-edit-patch patch XX_patchname" +where you should replace XX with a new number and patchname with a +descriptive shortname of the patch. You can then simply edit all the +files your patch wants to edit, and then simply "exit 0" from the shell +to actually create the patch file. + +To tweak an already existing patch, call "dpatch-edit-patch XX_patchname" +and replace XX_patchname with the actual filename from debian/patches +you want to use. + +To clean up afterwards again, "debian/rules unpatch" will do the +work for you - or you can of course choose to call +"fakeroot debian/rules clean" all together. + + +--- + +this documentation is part of dpatch package, and may be used by +packages using dpatch to comply with policy on README.source. This +documentation is meant to be useful to users who are not proficient in +dpatch in doing work with dpatch-based packages. Please send any +improvements to the BTS of dpatch package. + +original text by Gerfried Fuchs, edited by Junichi Uekawa +10 Aug 2008. --- libfile-slurp-perl-9999.16.orig/debian/changelog +++ libfile-slurp-perl-9999.16/debian/changelog @@ -0,0 +1,131 @@ +libfile-slurp-perl (9999.16-1) unstable; urgency=low + + * New upstream release (more robust wrt. utf-8) + * removed some local patches, updated watch file + + -- Alexander Zangerl Wed, 11 May 2011 19:06:20 +1000 + +libfile-slurp-perl (9999.13-3) unstable; urgency=low + + * incorporated new utf8 tests (closes: #600870) + * cleaned some lintian warnings + * lifted standards version + + -- Alexander Zangerl Sun, 13 Mar 2011 00:57:54 +1000 + +libfile-slurp-perl (9999.13-2) unstable; urgency=low + + * updated watch file (upstream changed) + + -- Alexander Zangerl Sun, 25 Apr 2010 14:15:25 +1000 + +libfile-slurp-perl (9999.13-1) unstable; urgency=low + + * New upstream release (closes: #546747) + + -- Alexander Zangerl Wed, 16 Sep 2009 09:56:44 +1000 + +libfile-slurp-perl (9999.12-3) unstable; urgency=low + + * added dpatch to build deps + * lifted standards version + * fixed too-low test plans (use_ok was missed) because + the newer test::xx tools are picky (closes: #546620) + + -- Alexander Zangerl Tue, 15 Sep 2009 17:58:21 +1000 + +libfile-slurp-perl (9999.12-2) unstable; urgency=low + + * modified binmode behaviour to work with multibyte-encoded + files. Thanks to Allard Hoeve for the patch. (closes: #429933) + also added a test for reading utf8-encoded data. + + -- Alexander Zangerl Wed, 27 Jun 2007 21:08:04 +1000 + +libfile-slurp-perl (9999.12-1) unstable; urgency=low + + * New upstream release + * lifted standards version, enabled full build tests by depending + some more perl test modules. + + -- Alexander Zangerl Thu, 15 Feb 2007 13:28:14 +1000 + +libfile-slurp-perl (9999.09-1) unstable; urgency=low + + * New upstream release (closes: #329540) + * updated watch file, lifted standards version, updated homepage + + -- Alexander Zangerl Sat, 24 Sep 2005 11:46:28 +1000 + +libfile-slurp-perl (9999.07-3) unstable; urgency=low + + * changed priority to optional: most perl packages seem + to be in the optional class and there are a few other packages + now that depend on libfile-slurp-perl and seem to belong to optional + themselves. + + -- Alexander Zangerl Sat, 16 Apr 2005 22:59:53 +1000 + +libfile-slurp-perl (9999.07-2) unstable; urgency=low + + * i'm taking back the package after an...ahem, injudicious upload + by a fellow developer. no names named, and thanks for telling + me about your mistake. + * upstream version lifted to 9999.07 + * fixed watch file + * fixed copyright file with perl paragraph + + -- Alexander Zangerl Mon, 11 Apr 2005 23:24:39 +1000 + +libfile-slurp-perl (9999.01-1) unstable; urgency=low + + * New upstream release, upstream maintainer changed, section corrected + * lifted standards version, added homepage to description + + -- Alexander Zangerl Thu, 11 Dec 2003 13:18:42 +1000 + +libfile-slurp-perl (2004.0904-1) unstable; urgency=low + + * new upstream version + * lifted standards version + + -- Alexander Zangerl Fri, 19 Sep 2003 19:52:23 +1000 + +libfile-slurp-perl (2002.1031-2) unstable; urgency=low + + * lifted standards version, debhelper cleanup + + -- Alexander Zangerl Sun, 9 Mar 2003 12:09:52 +1000 + +libfile-slurp-perl (2002.1031-1) unstable; urgency=low + + * New upstream release + * disabled /usr/doc transition stuff + + -- Alexander Zangerl Fri, 3 Jan 2003 16:00:10 +1000 + +libfile-slurp-perl (2002.0305-1) unstable; urgency=low + + * new upstream version which includes the changes in 2001.1103-3 + + -- Alexander Zangerl Sat, 9 Mar 2002 20:43:23 +1000 + +libfile-slurp-perl (2001.1103-3) unstable; urgency=low + + * added handling of $TMPDIR, $TEMP or $TMP for the tests. + * added some more error handling + + -- Alexander Zangerl Wed, 6 Mar 2002 00:27:45 +1000 + +libfile-slurp-perl (2001.1103-2) unstable; urgency=low + + * fixed dpkg-source warnings, initial upload (Closes: Bug#136175) + + -- Alexander Zangerl Mon, 4 Mar 2002 13:43:09 +1000 + +libfile-slurp-perl (2001.1103-1) unstable; urgency=low + + * Initial Release. + + -- Alexander Zangerl Wed, 27 Feb 2002 16:07:46 +1000 + --- libfile-slurp-perl-9999.16.orig/debian/control +++ libfile-slurp-perl-9999.16/debian/control @@ -0,0 +1,17 @@ +Source: libfile-slurp-perl +Section: perl +Priority: optional +Maintainer: Alexander Zangerl +Build-Depends: debhelper (>= 7.0.0), dpatch +Build-Depends-Indep: perl, libtest-pod-coverage-perl, libtest-pod-perl +Standards-Version: 3.9.1 + +Package: libfile-slurp-perl +Architecture: all +Depends: ${perl:Depends}, ${misc:Depends} +Homepage: http://search.cpan.org/~uri/ +Description: single call read & write file routines + This module consists of some quickie routines that read from, + append to or overwrite a file with a single subroutine call. Their main + intention is to save a couple of lines of code over and over again, + but they do not do anything fancy. --- libfile-slurp-perl-9999.16.orig/debian/copyright +++ libfile-slurp-perl-9999.16/debian/copyright @@ -0,0 +1,15 @@ +This package was debianized by Alexander Zangerl . +It was downloaded from http://www.cpan.org/authors/id/U/UR/URI/ + +Upstream Author: Uri Guttman + +Copyright: + +"Copyright (C) 2003 Uri Guttman + +Licensed the same as Perl." + +Perl is distributed under your choice of the GNU General Public License or +the Artistic License. On Debian GNU/Linux systems, the complete text of the +GNU General Public License can be found in `/usr/share/common-licenses/GPL' +and the Artistic Licence in `/usr/share/common-licenses/Artistic'. --- libfile-slurp-perl-9999.16.orig/debian/compat +++ libfile-slurp-perl-9999.16/debian/compat @@ -0,0 +1 @@ +7 --- libfile-slurp-perl-9999.16.orig/debian/watch +++ libfile-slurp-perl-9999.16/debian/watch @@ -0,0 +1,2 @@ +version=3 +http://www.cpan.org/authors/id/D/DR/DROLSKY/File-Slurp-(.*)\.tar\.gz debian --- libfile-slurp-perl-9999.16.orig/debian/libfile-slurp-perl.docs +++ libfile-slurp-perl-9999.16/debian/libfile-slurp-perl.docs @@ -0,0 +1,2 @@ +README +debian/README.source --- libfile-slurp-perl-9999.16.orig/debian/rules +++ libfile-slurp-perl-9999.16/debian/rules @@ -0,0 +1,51 @@ +#!/usr/bin/make -f +# Sample debian/rules that uses debhelper. +# GNU copyright 1997 to 1999 by Joey Hess. + +# to get the patch application targets +include /usr/share/dpatch/dpatch.make + +configure: Makefile +Makefile: Makefile.PL + dh_testdir + perl Makefile.PL INSTALLDIRS=vendor + +build: build-stamp + +build-stamp: patch configure + dh_testdir + $(MAKE) OPTIMIZE="-O2 -g -Wall" + touch build-stamp + +clean: unpatch + dh_testdir + dh_testroot + rm -f build-stamp + [ ! -f Makefile ] || $(MAKE) distclean + rm -f Makefile Makefile.old + dh_clean + +# Build architecture-independent files here. +binary-indep: build + dh_testdir + dh_testroot + dh_clean + dh_installdirs + $(MAKE) test + $(MAKE) install DESTDIR=$(CURDIR)/debian/libfile-slurp-perl/ + dh_install + dh_installdocs -n + dh_installchangelogs + dh_compress + dh_fixperms + dh_installdeb + dh_perl + dh_gencontrol + dh_md5sums + dh_builddeb + +# Build architecture-dependent files here. +binary-arch: build + +binary: binary-indep binary-arch +.PHONY: build clean binary-indep binary-arch binary configure --- libfile-slurp-perl-9999.16.orig/debian/patches/01_binmode.dpatch +++ libfile-slurp-perl-9999.16/debian/patches/01_binmode.dpatch @@ -0,0 +1,104 @@ +#! /bin/sh /usr/share/dpatch/dpatch-run +## 01_binmode.dpatch by +## +## All lines beginning with `## DP:' are a description of the patch. +## DP: binmode fix for multibyte-encoded data + +@DPATCH@ +diff -urNad '--exclude=CVS' '--exclude=.svn' '--exclude=.git' '--exclude=.arch' '--exclude=.hg' '--exclude=_darcs' '--exclude=.bzr' libfile-slurp-perl-9999.16~/MANIFEST libfile-slurp-perl-9999.16/MANIFEST +--- libfile-slurp-perl-9999.16~/MANIFEST 2011-03-21 06:27:55.000000000 +1000 ++++ libfile-slurp-perl-9999.16/MANIFEST 2011-05-11 19:14:00.393079954 +1000 +@@ -29,6 +29,8 @@ + t/stringify.t + t/tainted.t + t/write_file_win32.t ++t/utf8.data ++t/utf8.t + experiment/prepend.pl + experiment/edit_file.pl + extras/slurp_bench.pl +diff -urNad '--exclude=CVS' '--exclude=.svn' '--exclude=.git' '--exclude=.arch' '--exclude=.hg' '--exclude=_darcs' '--exclude=.bzr' libfile-slurp-perl-9999.16~/META.yml libfile-slurp-perl-9999.16/META.yml +--- libfile-slurp-perl-9999.16~/META.yml 2011-04-24 14:24:46.000000000 +1000 ++++ libfile-slurp-perl-9999.16/META.yml 2011-05-11 19:14:38.797416453 +1000 +@@ -8,6 +8,7 @@ + generated_by: ExtUtils::MakeMaker version 6.42 + distribution_type: module + requires: ++ Digest::MD5: 0 + Carp: 0 + Exporter: 0 + Fcntl: 0 +diff -urNad '--exclude=CVS' '--exclude=.svn' '--exclude=.git' '--exclude=.arch' '--exclude=.hg' '--exclude=_darcs' '--exclude=.bzr' libfile-slurp-perl-9999.16~/t/utf8.data libfile-slurp-perl-9999.16/t/utf8.data +--- libfile-slurp-perl-9999.16~/t/utf8.data 1970-01-01 10:00:00.000000000 +1000 ++++ libfile-slurp-perl-9999.16/t/utf8.data 2011-05-11 19:12:19.265093862 +1000 +@@ -0,0 +1,3 @@ ++hallo grüezi blödel schaß und aus. ++Gregorian: ლრ ++Arabic: ڐڡڠڟڞ +diff -urNad '--exclude=CVS' '--exclude=.svn' '--exclude=.git' '--exclude=.arch' '--exclude=.hg' '--exclude=_darcs' '--exclude=.bzr' libfile-slurp-perl-9999.16~/t/utf8.t libfile-slurp-perl-9999.16/t/utf8.t +--- libfile-slurp-perl-9999.16~/t/utf8.t 1970-01-01 10:00:00.000000000 +1000 ++++ libfile-slurp-perl-9999.16/t/utf8.t 2011-05-11 19:12:19.265093862 +1000 +@@ -0,0 +1,40 @@ ++#!/usr/bin/perl ++use Test::More tests => 4; ++use strict; ++use File::Slurp; ++use Encode qw/encode_utf8/; ++use Digest::MD5 qw/md5_hex/; ++use Devel::Peek; ++ ++my $digest = 'e30ffef9b0c5623bc1ddd1ba73302f14'; ++ ++my $utf8 = read_file("t/utf8.data", binmode => ":utf8"); ++my $latin = read_file("t/utf8.data"); ++ ++ok( Encode::is_utf8($utf8), "Reading the data file with binmode options results in UTF8 encoded string"); ++ok(! Encode::is_utf8($latin), "Reading the data file without options correctly results in unencoded string"); ++ ++my $ctx1 = new Digest::MD5; ++ $ctx1->add(encode_utf8($utf8)); # encode_utf8 is needed, see http://search.cpan.org/dist/Digest-MD5/MD5.pm ++ ++ok($ctx1->hexdigest eq $digest, "The data from the data file we just read came through intact"); ++ ++ ++### ++# Write to a tempfile and rest ++### ++ ++my $fn_utf8 = "/tmp/file-slurp-utf8.txt"; ++ ++write_file($fn_utf8, { binmode => ":utf8" }, $utf8); ++ ++open my $fh_utf8, "$fn_utf8" or die "Could not open $fn_utf8: $!\n"; ++my $ctx2 = new Digest::MD5; ++ $ctx2->addfile($fh_utf8); ++ ++ok($ctx2->hexdigest eq $digest, "The data is written correctly with binmode options"); ++ ++unlink($fn_utf8); ++ ++ ++ +diff -urNad '--exclude=CVS' '--exclude=.svn' '--exclude=.git' '--exclude=.arch' '--exclude=.hg' '--exclude=_darcs' '--exclude=.bzr' libfile-slurp-perl-9999.16~/t/utf8.t.alt libfile-slurp-perl-9999.16/t/utf8.t.alt +--- libfile-slurp-perl-9999.16~/t/utf8.t.alt 1970-01-01 10:00:00.000000000 +1000 ++++ libfile-slurp-perl-9999.16/t/utf8.t.alt 2011-05-11 19:12:19.265093862 +1000 +@@ -0,0 +1,19 @@ ++use Test::More tests => 1; ++use strict; ++use File::Slurp; ++my $fn="/tmp/utf8.txt"; ++ ++my $data="hallo grezi bldel scha und aus.\n"; ++open F,">$fn"; ++binmode(F, ":utf8"); ++print F $data; ++close F; ++ ++my $x=read_file($fn,binmode=>":utf8"); ++ok($x eq $data,"utf8 encoded data survives slurp"); ++unlink($fn); ++ ++ ++ ++ ++ --- libfile-slurp-perl-9999.16.orig/debian/patches/00list +++ libfile-slurp-perl-9999.16/debian/patches/00list @@ -0,0 +1,3 @@ +01_binmode + +