ExtUtils::MakeMaker::prompt cannot return 0

	Message-ID: <360127B6.E44564A@ispsoft.de>

p4raw-id: //depot/perl@1851

diff --git a/lib/ExtUtils/MakeMaker.pm b/lib/ExtUtils/MakeMaker.pm
index 3e17be1..6321926 100644 (file)
--- a/lib/ExtUtils/MakeMaker.pm
+++ b/lib/ExtUtils/MakeMaker.pm
@@ -192,7 +192,7 @@ sub prompt ($;$) {
     } else {
        print "$def\n";
     }
-    return $ans || $def;
+    return ($ans ne '') ? $ans : $def;
 }
 
 sub eval_in_subdirs {