In Perl_newCONSTSUB(), sv should not be NULL.

[p5sagit/p5-mst-13.2.git] / configpm

diff --git a/configpm b/configpm
index 17f02c5..1825b0d 100755 (executable)
--- a/configpm
+++ b/configpm
@@ -548,11 +548,12 @@ foreach my $prefix (qw(libs libswanted)) {
 $heavy_txt .= "EOVIRTUAL\n";
 
 $heavy_txt .= <<'ENDOFGIT';
-eval { 
+eval {
        # do not have hairy conniptions if this isnt available
        require 'Config_git.pl';
        $Config_SH_expanded .= $Config::Git_Data;
-};
+       1;
+} or warn "Warning: failed to load Config_git.pl, something strange about this perl...\n";
 ENDOFGIT
 
 $heavy_txt .= $fetch_string;