[Module-build-checkins] Module-Build/t install.t,1.14,1.15

[Ken W. <kwi...@us...>]

Update of /cvsroot/module-build/Module-Build/t
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4034/t

Modified Files:
	install.t 
Log Message:
Integrate packlist stuff from branch

Index: install.t
===================================================================
RCS file: /cvsroot/module-build/Module-Build/t/install.t,v
retrieving revision 1.14
retrieving revision 1.15
diff -u -d -r1.14 -r1.15
--- install.t	7 Jan 2005 10:15:53 -0000	1.14
+++ install.t	10 Mar 2005 05:03:15 -0000	1.15
@@ -1,7 +1,7 @@
 use strict;
 
 use Test; 
-BEGIN { plan tests => 30 }
+BEGIN { plan tests => 31 }
 
 use Module::Build;
 use File::Spec;
@@ -40,6 +40,11 @@
   local @INC = (@INC, File::Spec->catdir($destdir, $libdir));
   eval {require Sample};
   ok $@, '';
+  
+  # Make sure there's a packlist installed
+  my $archdir = $build->install_destination('arch');
+  my $packlist = File::Spec->catdir($destdir, $archdir, 'auto', 'Sample', '.packlist');
+  ok -e $packlist, 1, "$packlist should be written";
 }
 
 {