Update of /cvsroot/module-build/Module-Build/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4664/t
Modified Files:
destinations.t
Log Message:
This test exposes that installdirs() silently throws away your settings.
Index: destinations.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/destinations.t,v
retrieving revision 1.10
retrieving revision 1.11
diff -u -d -r1.10 -r1.11
--- destinations.t 20 Jun 2005 23:54:40 -0000 1.10
+++ destinations.t 21 Jun 2005 00:03:15 -0000 1.11
@@ -13,7 +13,7 @@
}
-use Test::More tests => 44;
+use Test::More tests => 49;
use_ok 'Module::Build';
@@ -27,6 +27,7 @@
$m->install_base(undef);
$m->prefix(undef);
+is( $m->installdirs, 'site' );
is( $m->install_base, undef );
is( $m->prefix, undef );
@@ -43,6 +44,7 @@
# Is installdirs honored?
$m->installdirs('core');
+is( $m->installdirs, 'core' );
test_install_destinations( $m, {
lib => $Config{installprivlib},
@@ -55,6 +57,7 @@
$m->installdirs('site');
+is( $m->installdirs, 'site' );
# Check install_base()
@@ -89,10 +92,12 @@
# And now that prefix honors installdirs.
$m->installdirs('core');
+is( $m->installdirs, 'core' );
test_prefix($prefix);
$m->installdirs('site');
+is( $m->installdirs, 'site' );
# Check that we can use install_base after setting prefix.
|