Leave first filename and linenumber on the same line as error text.

Signed-off-by: Tom Eastep <teastep@shorewall.net>
This commit is contained in:
Tom Eastep 2012-05-08 08:55:24 -07:00
parent 089d980dae
commit 59bf343521

View File

@ -809,7 +809,7 @@ sub currentlineinfo() {
my $linenumber = $currentlinenumber || 1; my $linenumber = $currentlinenumber || 1;
if ( $currentfile ) { if ( $currentfile ) {
my $lineinfo = @includestack || @openstack ? "\n $currentfilename " : " $currentfilename "; my $lineinfo = " $currentfilename ";
if ( $linenumber eq 'EOF' ) { if ( $linenumber eq 'EOF' ) {
$lineinfo .= '(EOF)' $lineinfo .= '(EOF)'