From 372ff2ba6467e8fcea3eb19e5527a5fc398802f9 Mon Sep 17 00:00:00 2001 From: Eric Wong Date: Sun, 10 Jan 2021 12:15:10 +0000 Subject: lei: fix oneshot TTY detection by passing STD*{GLOB} ... instead of STD*{IO}. I'm not sure why *STDOUT{IO} being an IO::File object disqualifies it from the "-t" perlop check returning true on TTY, but it does. So use *STDOUT{GLOB} for now. http://nntp.perl.org/group/perl.perl5.porters/258760 Message-ID: --- lib/PublicInbox/LEI.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/lib/PublicInbox/LEI.pm b/lib/PublicInbox/LEI.pm index 24f5930b..17023191 100644 --- a/lib/PublicInbox/LEI.pm +++ b/lib/PublicInbox/LEI.pm @@ -795,9 +795,9 @@ sub oneshot { local %PATH2CFG; umask(077) // die("umask(077): $!"); dispatch((bless { - 0 => *STDIN{IO}, - 1 => *STDOUT{IO}, - 2 => *STDERR{IO}, + 0 => *STDIN{GLOB}, + 1 => *STDOUT{GLOB}, + 2 => *STDERR{GLOB}, env => \%ENV }, __PACKAGE__), @ARGV); } -- cgit v1.2.3-24-ge0c7