[interchange] Make Makefile.PL die a hero's death if it can't chdir() to RealBin

David Christensen <[email protected]> Thu, 02 Nov 2017 20:45:47 +0000

Newsgroups	gmane.comp.web.interchange.cvs
Message-ID	<[email protected]>

commit 0a425cba2624b1048c2fca5eb9bc874d6a76ec03
Author: David Christensen <[email protected]>
Date:   Thu Nov 2 15:44:40 2017 -0500

    Make Makefile.PL die a hero's death if it can't chdir() to RealBin

 Makefile.PL |    1 +
 1 files changed, 1 insertions(+), 0 deletions(-)
---
diff --git a/Makefile.PL b/Makefile.PL
index 5239268..12b0866 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -6,6 +6,7 @@ BEGIN {
 		require FindBin;
 		chdir $FindBin::RealBin;
 	};
+    die "Can't cd to $FindBin::RealBin!\n" if $@;
 }
 
 use Config;