Author: stas
Date: Tue May 10 20:55:30 2005
New Revision: 169572
URL: http://svn.apache.org/viewcvs?rev=169572&view=rev
Log:
terminate the error message by \n so it won't print an irrelevant:
"at lib/ModPerl/BuildOptions.pm line 109, <DATA> line 23."
at the end of Usage string
Modified:
perl/modperl/trunk/lib/ModPerl/BuildOptions.pm
Modified: perl/modperl/trunk/lib/ModPerl/BuildOptions.pm
URL:
http://svn.apache.org/viewcvs/perl/modperl/trunk/lib/ModPerl/BuildOptions.pm?rev=169572&r1=169571&r2=169572&view=diff
==============================================================================
--- perl/modperl/trunk/lib/ModPerl/BuildOptions.pm (original)
+++ perl/modperl/trunk/lib/ModPerl/BuildOptions.pm Tue May 10 20:55:30 2005
@@ -106,7 +106,7 @@
if (!$table->{$key} and $opts & UNKNOWN_FATAL) {
my $usage = usage();
- die "Unknown Option: $key\nUsage:\n$usage";
+ die "Unknown Option: $key\nUsage:\n$usage\n";
}
if ($key eq 'MP_APXS') {
