Turn the roundtrip source generation fail into a warning
Peter Rabbitson [Wed, 10 Nov 2010 22:56:54 +0000 (22:56 +0000)]
Makefile.PL

index 4f54cfb..96f385c 100644 (file)
@@ -55,7 +55,6 @@ resources Ratings => 'http://cpanratings.perl.org/d/SQL-Translator';
 
 all_from    'lib/SQL/Translator.pm';
 
-
 for my $type (qw/requires recommends test_requires/) {
   no strict qw/refs/;
   my $f = \&$type;
@@ -88,7 +87,6 @@ if ($Module::Install::AUTHOR) {
 
 WriteAll();
 
-
 sub _recompile_grammars {
   # placeholder, will be used to recompile P::RD parsers before shipping
   # will also allow to lose dependency on P::RD
@@ -126,18 +124,21 @@ sub _recreate_rt_source {
   };
 
   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;
+  <>;
   }
 }