r53038 - /trunk/dh-make-perl/t/Control.t
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Thu Feb 18 22:30:49 UTC 2010
Author: dmn
Date: Thu Feb 18 22:30:34 2010
New Revision: 53038
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=53038
Log:
Control.t: add a test for pruning 'perl' and 'perl-modles' from Depends
${perl:Depends} should be used instead of these
Modified:
trunk/dh-make-perl/t/Control.t
Modified: trunk/dh-make-perl/t/Control.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/dh-make-perl/t/Control.t?rev=53038&op=diff
==============================================================================
--- trunk/dh-make-perl/t/Control.t (original)
+++ trunk/dh-make-perl/t/Control.t Thu Feb 18 22:30:34 2010
@@ -3,7 +3,7 @@
use strict;
use warnings;
-use Test::More tests => 17;
+use Test::More tests => 19;
use Test::Exception;
use Test::Differences;
@@ -67,3 +67,11 @@
my $written = "";
lives_ok { $c->write(\$written) } 'Control writes can write to a scalar ref';
eq_or_diff( $written, $control, 'Control writes what it have read' );
+
+use_ok('Debian::Control::FromCPAN');
+bless $c, 'Debian::Control::FromCPAN';
+$c->binary->FETCH('libtest-compile-perl')->Depends->add('perl-modules');
+$c->prune_perl_deps;
+is( $c->binary->FETCH('libtest-compile-perl')->Depends . '',
+ '${misc:Depends}, ${perl:Depends}, libuniversal-require-perl'
+);
More information about the Pkg-perl-cvs-commits
mailing list