all_from 'lib/SQL/Translator.pm';
-
for my $type (qw/requires recommends test_requires/) {
no strict qw/refs/;
my $f = \&$type;
WriteAll();
-
sub _recompile_grammars {
# placeholder, will be used to recompile P::RD parsers before shipping
# will also allow to lose dependency on P::RD
};
if ($@) {
- print <<EOE;
+ warn <<EOE;
=========================================================================
-=============== FATAL ERROR =================
+=============== WARNING !!! =================
=========================================================================
Unable to update the roundtrip schema (attempt triggered by AUTHOR mode).
-Aborting Makefile generation.
+We will still generate a Makefile, but be aware that if you build a dist
+this way, it *WILL* be broken.
+-------------------------------------------------------------------------
$@
+Press Enter to continue.
EOE
- exit 1;
+ <>;
}
}