diff --git a/tracefile/tracefile b/tracefile/tracefile index 4399680..7f981e0 100755 --- a/tracefile/tracefile +++ b/tracefile/tracefile @@ -256,7 +256,8 @@ my @cmd = shell_quote(@ARGV); my $dir = "."; my $pid = $opt::pid ? "-p $opt::pid" : ""; -open(IN, "-|", "strace -ff $pid -e trace=file @cmd 2>&1") || die; +# BUG: If command gives output on stderr that can confuse the strace output +open(IN, "-|", "strace -ff $pid -e trace=file @cmd 2>&1 >/dev/null") || die; while() { if(/chdir."(([^\\"]|\\[\\"nt])*)".\s*=\s*0/) { $dir = $1;