X-Git-Url: http://git.draconx.ca/gitweb/mpdhacks.git/blobdiff_plain/f29495317b40288f38515571c0bd015ecdb0bfa3..f955e376aa421d6e1c169addf66e120d29415faa:/mpdmenu.pl diff --git a/mpdmenu.pl b/mpdmenu.pl index 23569d5..7a48c20 100755 --- a/mpdmenu.pl +++ b/mpdmenu.pl @@ -3,7 +3,7 @@ use strict; use Getopt::Long; -use IO::Socket; +use IO::Socket::INET6; use constant { MPD_MJR_MIN => 0, @@ -46,7 +46,7 @@ $artist = decode_utf8($artist) if defined($artist); $title = decode_utf8($title) if defined($title);; # Connect to MPD. -my $sock = new IO::Socket::INET( +my $sock = new IO::Socket::INET6( PeerAddr => $host, PeerPort => $port, Proto => 'tcp'