Index: lang/perl/Module-New/trunk/t/lib/Module/New/Test/Config/Merge.pm
===================================================================
--- lang/perl/Module-New/trunk/t/lib/Module/New/Test/Config/Merge.pm (revision 31586)
+++ lang/perl/Module-New/trunk/t/lib/Module/New/Test/Config/Merge.pm (revision 31629)
@@ -9,5 +9,5 @@
   my $class = shift;
 
-  my $config = Module::New::Config->new;
+  my $config = Module::New::Config->new( no_prompt => 1 );
 
   local @ARGV = qw(--first=first --second=second);
Index: lang/perl/Module-New/trunk/t/lib/Module/New/Test/Path/GuessRoot.pm
===================================================================
--- lang/perl/Module-New/trunk/t/lib/Module/New/Test/Path/GuessRoot.pm (revision 31586)
+++ lang/perl/Module-New/trunk/t/lib/Module/New/Test/Path/GuessRoot.pm (revision 31629)
@@ -72,7 +72,12 @@
 
   my $current = dir('.');
-  my $root    = dir('/');  # I believe root doesn't have a project.
-
-  chdir $root;
+  my $dir;
+  foreach my $candidate (qw( / /tmp )) {
+    $dir = dir($candidate);
+    last if chdir $dir;
+  }
+  if ( $current eq $dir ) {
+    return $class->skip_this_test('this test may be unstable for you')
+  }
 
   local $@;
Index: lang/perl/Module-New/trunk/t/lib/Module/New/Test/Command/GuessRoot.pm
===================================================================
--- lang/perl/Module-New/trunk/t/lib/Module/New/Test/Command/GuessRoot.pm (revision 31586)
+++ lang/perl/Module-New/trunk/t/lib/Module/New/Test/Command/GuessRoot.pm (revision 31629)
@@ -21,20 +21,4 @@
 }
 
-sub with_option : Test {
-  my $class = shift;
-
-  my $recipe = $class->load_recipe;
-
-  my $current = dir('.');
-  my $testdir = dir('t');
-
-  my $context = Module::New->setup('Module::New::ForTest');
-     $context->config->set( root => $testdir );
-  eval { $recipe->run; };
-  ok !$@ && $context->path->_root eq $testdir, $class->message('t/ is root');
-
-  chdir $current;
-}
-
 sub load_recipe {
   delete $INC{'Module/New/ForTest/Recipe/GuessRoot.pm'};
Index: lang/perl/Module-New/trunk/lib/Module/New.pm
===================================================================
--- lang/perl/Module-New/trunk/lib/Module/New.pm (revision 31586)
+++ lang/perl/Module-New/trunk/lib/Module/New.pm (revision 31629)
@@ -6,5 +6,5 @@
 use Module::New::Loader;
 
-our $VERSION = '0.02';
+our $VERSION = '0.03';
 
 my $CONTEXT;
Index: lang/perl/Module-New/trunk/lib/Module/New/Path.pm
===================================================================
--- lang/perl/Module-New/trunk/lib/Module/New/Path.pm (revision 31586)
+++ lang/perl/Module-New/trunk/lib/Module/New/Path.pm (revision 31629)
@@ -45,10 +45,7 @@
   }
 
-  my $current = my $dir = $self->_dir('.');
-  if ( $dir->subdir('lib')->exists ) {
-    return $self->set_root($dir);
-  }
-
-  while ( $dir->parent ne $dir ) {
+  my $try = 30;
+  my $dir = $self->_dir('.');
+  while ( $try-- and $dir->parent ne $dir ) {
     if ( $dir->subdir('lib')->exists ) {
       if ( $dir->file('Makefile.PL')->exists
Index: lang/perl/Module-New/trunk/Makefile.PL
===================================================================
--- lang/perl/Module-New/trunk/Makefile.PL (revision 31586)
+++ lang/perl/Module-New/trunk/Makefile.PL (revision 31629)
@@ -11,5 +11,5 @@
     'File::HomeDir'         => '0.66',
     'Getopt::Long'          => 0,
-    'Log::Dump'             => 0,
+    'Log::Dump'             => '0.03',
     'Path::Extended'        => '0.10',
     'String::CamelCase'     => 0,
Index: lang/perl/Module-New/trunk/Changes
===================================================================
--- lang/perl/Module-New/trunk/Changes (revision 31586)
+++ lang/perl/Module-New/trunk/Changes (revision 31629)
@@ -1,3 +1,9 @@
 Revision history for Module-New
+
+0.03 2009/03/28
+  - bumped up the version req of Log::Dump to 0.03
+  - added missing "no_prompt" for a config test
+    (which must be the cause of the hang)
+  - removed a broken piece of a test (deprecated option)
 
 0.02 2009/03/26