From ed0344e8615a741e96b9670e5186ee3f4b2c1a2f Mon Sep 17 00:00:00 2001
From: Alessandro Ranellucci <aar@cpan.org>
Date: Sat, 24 Aug 2013 12:12:46 +0200
Subject: [PATCH] Explain user that he doesn't need to worry if a failed module
 was optional. One more fix for Windows, also

---
 Build.PL | 12 +++++++++---
 1 file changed, 9 insertions(+), 3 deletions(-)

diff --git a/Build.PL b/Build.PL
index 8f4b53ffd..10a82710c 100644
--- a/Build.PL
+++ b/Build.PL
@@ -98,7 +98,13 @@ EOF
     foreach my $module (sort keys %modules) {
         my $version = $modules{$module};
         my $res = system $cpanm, "$module~$version";
-        $missing_prereqs = 1 if $res != 0 && exists $prereqs{$module};
+        if ($res != 0) {
+            if (exists $prereqs{$module}) {
+                $missing_prereqs = 1;
+            } else {
+                printf "Don't worry, this module is optional.\n";
+            }
+        }
     }
     
     # temporarily require this dev version until this upstream bug
@@ -109,9 +115,9 @@ EOF
     # with current perl binary
     if (-e './xs/Build') {
         if ($^O eq 'MSWin32') {
-            system 'pushd', 'xs';
+            system 'cd', 'xs';
             system 'Build', 'distclean';
-            system 'popd';
+            system 'cd', '..';
         } else {
             system './xs/Build', 'distclean';
         }