X-Git-Url: http://git.vpit.fr/?p=perl%2Fscripts%2Fxchat.git;a=blobdiff_plain;f=Xchat%2FXPI%2FNet.pm;fp=Xchat%2FXPI%2FNet.pm;h=9cb99379a4d76a99e97f2d7b9745a4288daa089b;hp=a7b267927059493c6d1060381db1f9a28071bc5c;hb=9db5de0ec290fd8b82a9c510e0d627b31e44d9bd;hpb=80f827633d7173e4388bfce83f6bb304f37cecab diff --git a/Xchat/XPI/Net.pm b/Xchat/XPI/Net.pm index a7b2679..9cb9937 100644 --- a/Xchat/XPI/Net.pm +++ b/Xchat/XPI/Net.pm @@ -7,10 +7,10 @@ use IO::Socket::INET; use Net::DNS; -use Xchat qw/:all/; +use Xchat qw<:all>; use lib get_info 'xchatdir'; -use Xchat::XPI qw/register init/; +use Xchat::XPI qw; our $VERSION = '0.03'; @@ -110,10 +110,10 @@ sub _whois_recv { return REMOVE; } -use base qw/Exporter/; +use base qw; our @EXPORT = (); -our %EXPORT_TAGS = ('funcs' => [ qw/resolve whois/ ]); +our %EXPORT_TAGS = ('funcs' => [ qw ]); our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS; $EXPORT_TAGS{'all'} = [ @EXPORT_OK ];