--- libsys-gamin-perl-0.1.orig/debian/changelog +++ libsys-gamin-perl-0.1/debian/changelog @@ -0,0 +1,11 @@ +libsys-gamin-perl (0.1-1build1) oneiric; urgency=low + + * Rebuild for Perl 5.12. + + -- Colin Watson Fri, 06 May 2011 16:56:43 +0100 + +libsys-gamin-perl (0.1-1) unstable; urgency=low + + * Initial release. (Closes: #464891) + + -- Andres Mejia Wed, 31 Dec 2008 15:18:19 -0500 --- libsys-gamin-perl-0.1.orig/debian/rules +++ libsys-gamin-perl-0.1/debian/rules @@ -0,0 +1,30 @@ +#!/usr/bin/make -f + +include /usr/share/quilt/quilt.make + +build: build-stamp +build-stamp: $(QUILT_STAMPFN) + dh build + touch $@ + +clean: unpatch + # we need to touch Makefile, otherwise Makefile.PL is newer after unpatching + [ ! -f Makefile ] || touch Makefile + dh clean + +install: install-stamp +install-stamp: build-stamp + dh install + touch $@ + +binary-arch: install + dh $@ --before dh_shlibdeps + # Ensure dependency on libgamin0, not libfam0. See bug #510368. + dh_shlibdeps -- -xlibfam0 + dh $@ --remaining + +binary-indep: + +binary: binary-arch binary-indep + +.PHONY: binary binary-arch binary-indep install clean build --- libsys-gamin-perl-0.1.orig/debian/watch +++ libsys-gamin-perl-0.1/debian/watch @@ -0,0 +1,3 @@ +version=3 +# URL to the package page followed by a regex to search +http://search.cpan.org/dist/Sys-Gamin/ .*/Sys-Gamin-v?(\d[\d_.]+)\.(?:tar(?:\.gz|\.bz2)?|tgz|zip) --- libsys-gamin-perl-0.1.orig/debian/compat +++ libsys-gamin-perl-0.1/debian/compat @@ -0,0 +1 @@ +7 --- libsys-gamin-perl-0.1.orig/debian/control +++ libsys-gamin-perl-0.1/debian/control @@ -0,0 +1,19 @@ +Source: libsys-gamin-perl +Section: perl +Priority: optional +Build-Depends: debhelper (>= 7), quilt (>= 0.40), libgamin-dev +Maintainer: Debian Perl Group +Uploaders: Andres Mejia +Standards-Version: 3.8.0 +Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libsys-gamin-perl/ +Vcs-Browser: + http://svn.debian.org/viewsvn/pkg-perl/trunk/libsys-gamin-perl/ +Homepage: http://search.cpan.org/dist/Sys-Gamin/ + +Package: libsys-gamin-perl +Architecture: any +Depends: ${perl:Depends}, ${shlibs:Depends}, libgamin0, ${misc:Depends} +Description: Perl interface to Gamin (File Access Monitor implementation) + The Sys::Gamin module provides a somewhat higher-level and friendlier interface + to the Gamin File Access Monitor API. This allows one to monitor both local and + remote (NFS-mounted) files and directories for common filesystem events. --- libsys-gamin-perl-0.1.orig/debian/copyright +++ libsys-gamin-perl-0.1/debian/copyright @@ -0,0 +1,31 @@ +Format-Specification: + http://wiki.debian.org/Proposals/CopyrightFormat?action=recall&rev=420 +Upstream-Maintainer: Carlos Garnacho +Upstream-Source: http://search.cpan.org/dist/Sys-Gamin/ +Upstream-Name: Sys-Gamin + +Files: * +Copyright: (c) 1997 Strategic Interactive Group. All rights reserved. + (c) 2005, J. Glick + (c) 2005, Carlos Garnacho +License-Alias: Perl +License: Artistic | GPL-1+ + +Files: debian/* +Copyright: 2008, Andres Mejia +License-Alias: Perl +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' --- libsys-gamin-perl-0.1.orig/debian/patches/makefile.pl.patch +++ libsys-gamin-perl-0.1/debian/patches/makefile.pl.patch @@ -0,0 +1,9 @@ +Don't install the monitor script +--- a/Makefile.PL ++++ b/Makefile.PL +@@ -17,5 +17,4 @@ + VERSION => '0.1', + LIBS => [q[-lfam]], + NAME => q(Sys::Gamin), +- EXE_FILES => [qw(monitor)] + ); --- libsys-gamin-perl-0.1.orig/debian/patches/series +++ libsys-gamin-perl-0.1/debian/patches/series @@ -0,0 +1,2 @@ +better_test.patch +makefile.pl.patch --- libsys-gamin-perl-0.1.orig/debian/patches/better_test.patch +++ libsys-gamin-perl-0.1/debian/patches/better_test.patch @@ -0,0 +1,53 @@ +Patch that provides a more meaningful test for Sys::Gamin +--- a/t/gamin.t ++++ b/t/gamin.t +@@ -1,6 +1,45 @@ +-use Test; +-use SGI::FAM; ++use strict; ++use Test::More tests => 13; ++use File::Temp qw( tempfile ); + +-plan tests => 1; ++BEGIN { use_ok('Sys::Gamin'); } + +-ok (SGI::FAM::FAMChanged != SGI::FAM::FAMDeleted); ++my $tmpdir = $ENV{TMP}; ++if (! defined $tmpdir) { $tmpdir = '/tmp'; } ++ ++my $fm = new Sys::Gamin; ++ok( defined $fm, 'new connection test' ); ++ ++$fm->monitor($tmpdir); ++my $event = $fm->next_event; ++ok( defined $event, 'next_event() test' ); ++ok( defined $event->filename, 'event pathname() test' ); ++ok( defined $event->type, 'event type() test' ); ++ ++SKIP: { ++ my $host = $event->hostname; ++ skip "event hostname() doesn't seem to be supported", 1 if ! $host; ++ ok( defined $host, 'event hostname() test' ); ++} ++ ++my ($fh, $file) = tempfile( UNLINK => 1, DIR => $tmpdir ); ++ok( defined $fm->pending, 'pending() test' ); ++my @monitored = $fm->monitored; ++ok( @monitored, 'monitored() test'); ++ok( defined $fm->which($event), 'which() test'); ++ ++SKIP: { ++ eval { $fm->suspend }; ++ my $reason = "suspend() is unsupported, in which case suspended() and "; ++ $reason .= "resume() will have no purpose."; ++ skip $reason, 3 if $@; ++ ok( ! $@, 'suspend() test' ); ++ my @suspended = $fm->suspended; ++ ok( @suspended, 'suspended() test' ); ++ eval { $fm->resume }; ++ ok( ! $@, 'resume() test' ); ++} ++ ++$fm->cancel($tmpdir); ++@monitored = $fm->monitored; ++ok( ! @monitored, 'cancel() test' );