Make 'perl Build.PL' work outside of the Parrot source tree

parrot · Mar 17, 2011 · 0e28feb · 0e28feb
1 parent 362ee8f
commit 0e28feb
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/Build.PL b/Build.PL
@@ -64,7 +64,7 @@ $builder->create_build_script();
 sub in_parrot_tree
 {
     my $cwd     = cwd();
-    return $cwd =~ /\bext\b.Parrot/;
+    return $cwd =~ /\bext\b.Parrot/ ? 1 : 0;
 }
 
 sub get_dl_env_var