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