[Module-build-checkins] CPANPLUS-Dist-Build/t 02_CPANPLUS-Dist-Build.t,1.1,1.2
Status: Beta
Brought to you by:
kwilliams
|
From: Ken W. <kwi...@us...> - 2005-08-04 01:45:25
|
Update of /cvsroot/module-build/CPANPLUS-Dist-Build/t In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv20190/t Modified Files: 02_CPANPLUS-Dist-Build.t Log Message: Uninstalling should work (but doesn't) Index: 02_CPANPLUS-Dist-Build.t =================================================================== RCS file: /cvsroot/module-build/CPANPLUS-Dist-Build/t/02_CPANPLUS-Dist-Build.t,v retrieving revision 1.1 retrieving revision 1.2 diff -u -d -r1.1 -r1.2 --- 02_CPANPLUS-Dist-Build.t 4 Aug 2005 01:36:03 -0000 1.1 +++ 02_CPANPLUS-Dist-Build.t 4 Aug 2005 01:45:16 -0000 1.2 @@ -134,14 +134,13 @@ "Installing module" ); ok( $mod->status->installed, " Status says module installed" ); - } SKIP: { - skip(q[Can't uninstall: Module::Build writes no .packlist], 1); - - ### XXX M::B doesn't seem to write into the .packlist... - ### can't figure out what to uninstall then... + my $minversion = 0.2609; + skip(qq[Uninstalling requires at least Module::Build $minversion], 1) + unless eval { Module::Build->VERSION($minversion); 1 }; + ok( $mod->uninstall,"Uninstalling module" ); } } |