[Module-build-checkins] Module-Build/lib/Module/Build Base.pm,1.559,1.560

[Randy W. S. <si...@us...>]

Update of /cvsroot/module-build/Module-Build/lib/Module/Build
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4610/lib/Module/Build

Modified Files:
	Base.pm 
Log Message:
Previous checkin omitted a few lines of comments

Index: Base.pm
===================================================================
RCS file: /cvsroot/module-build/Module-Build/lib/Module/Build/Base.pm,v
retrieving revision 1.559
retrieving revision 1.560
diff -u -d -r1.559 -r1.560
--- Base.pm	15 Mar 2006 02:23:00 -0000	1.559
+++ Base.pm	15 Mar 2006 02:52:36 -0000	1.560
@@ -339,7 +339,10 @@
 # interpreter, on other it may contain a relative path, or simply
 # 'perl'. This can also vary depending on whether a path was supplied
 # when perl was invoked. Additionally, the value in $^X may omit the
-# executable extension on platforms that use one. It's a
+# executable extension on platforms that use one. It's a fatal error
+# if the interpreter can't be found because it can result in undefined
+# behavior by routines that depend on it (generating errors or
+# invoking the wrong perl.
 sub find_perl_interpreter {
   my $proto = shift;
   my $c     = ref($proto) ? $proto->config : \%Config::Config;
@@ -406,7 +409,7 @@
   }
 
   # We've tried all alternatives, and didn't find a perl that matches
-  # our configuration. Throw an exception, and list alternative we tried.
+  # our configuration. Throw an exception, and list alternatives we tried.
   my @paths = map File::Basename::dirname($_), @potential_perls;
   die "Can't locate the perl binary used to run this script " .
       "in (@paths)\n";