]> Sergey Matveev's repositories - public-inbox.git/commitdiff
daemon: allow using IO::Socket::IP over INET6
authorEric Wong <e@80x24.org>
Mon, 7 Mar 2016 17:43:19 +0000 (17:43 +0000)
committerEric Wong <e@80x24.org>
Tue, 8 Mar 2016 04:14:15 +0000 (04:14 +0000)
IO::Socket::IP is bundled with newer versions of Perl,
so it is more likely to be available.  There should
be no differences between these with our use cases.

lib/PublicInbox/Daemon.pm

index a6707e832621812c055ec380a07b527b3e7be0d2..fcb1a3d358fc444d4653c082d1bceac3895b00fa 100644 (file)
@@ -68,8 +68,11 @@ sub daemon_prepare ($) {
                        }
                        $o{Local} = delete $o{Peer};
                } else {
-                       $sock_pkg = 'IO::Socket::INET6'; # works for IPv4, too
-                       eval "use $sock_pkg";
+                       # both work for IPv4, too
+                       for $sock_pkg (qw(IO::Socket::IP IO::Socket::INET6)) {
+                               eval "use $sock_pkg";
+                               $@ or last;
+                       }
                        die $@ if $@;
                        %o = (LocalAddr => $l, ReuseAddr => 1, Proto => 'tcp');
                }