X-Git-Url: http://www.git.stargrave.org/?a=blobdiff_plain;f=script%2Flei;h=029881f8a70d1cdcda66b4c17c55cfb1a9e47590;hb=b156cb4ef176b41131154a6d7632aed92b143fa0;hp=67e8b8b001472ff495d69623058b7de14580b25c;hpb=0939882b8a883e3f034bd059cdec4984d36f4ac7;p=public-inbox.git diff --git a/script/lei b/script/lei index 67e8b8b0..029881f8 100755 --- a/script/lei +++ b/script/lei @@ -4,10 +4,10 @@ use strict; use v5.10.1; use Socket qw(AF_UNIX SOCK_STREAM pack_sockaddr_un); -my $send_fd; +my $send_3fds; if (my ($sock, $pwd) = eval { require PublicInbox::Spawn; - $send_fd = PublicInbox::Spawn->can('send_fd') or die + $send_3fds = PublicInbox::Spawn->can('send_3fds') or die "Inline::C not installed/configured or IO::FDPass missing\n"; my $path = do { my $runtime_dir = ($ENV{XDG_RUNTIME_DIR} // '') . '/lei'; @@ -60,7 +60,7 @@ Falling back to (slow) one-shot mode $buf .= "\0\0"; select $sock; $| = 1; # unbuffer selected $sock - $send_fd->(fileno($sock), $_) for (0..2); + $send_3fds->(fileno($sock), 0, 1, 2); print $sock $buf or die "print(sock, buf): $!"; while ($buf = <$sock>) { $buf =~ /\Aexit=([0-9]+)\n\z/ and exit($1 + 0);