From dc3dad37dbe8ae1942d8c6ca73394c0f44ae6489 Mon Sep 17 00:00:00 2001 From: Paul Eggert Date: Tue, 15 Mar 2016 10:51:26 -0700 Subject: [PATCH] autom4te: fix problem when tracing to '-' * bin/autom4te.in (handle_traces): When $output is '-', use stdout rather than creating a file named '-'. This fixes a problem introduced by the recent port to the new Autom4te::XFile API. --- bin/autom4te.in | 12 ++++++++++-- 1 file changed, 10 insertions(+), 2 deletions(-) diff --git a/bin/autom4te.in b/bin/autom4te.in index 591771b2..59945cf2 100644 --- a/bin/autom4te.in +++ b/bin/autom4te.in @@ -550,7 +550,7 @@ sub handle_output ($$) } else { - $out->open($output, O_CREAT | O_WRONLY | O_TRUNC, oct ($mode)); + $out->open ($output, O_CREAT | O_WRONLY | O_TRUNC, oct ($mode)); } fatal "cannot create $output: $!" unless $out; @@ -834,7 +834,15 @@ EOF $trace_m4->close; my $in = new Autom4te::XFile ("$m4 " . shell_quote ("$tmp/traces.m4") . " |"); - my $out = new Autom4te::XFile ($output, ">"); + my $out = new Autom4te::XFile; + if ($output eq '-') + { + $out->open (">$output"); + } + else + { + $out->open ($output, ">"); + } # This is dubious: should we really transform the quadrigraphs in # traces? It might break balanced [ ] etc. in the output. The -- 2.47.2