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: <X/kgIqIuh4ZtUZNR@dcvr>

1 files 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);
 }