X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=tools.pl;h=b06f166d614b31cb12d53410dc245cb41e790a85;hb=e764db53b60b217e3d417c6faa60ba9bda6db3ea;hp=bf6af1804e4f3e6456d79e88646a9fd2c65ccd84;hpb=adb8d6067cfe7d29f2d1bd57e90a21a07c25c2e8;p=perl%2Fscripts%2Fxchat.git diff --git a/tools.pl b/tools.pl index bf6af18..b06f166 100755 --- a/tools.pl +++ b/tools.pl @@ -4,9 +4,9 @@ use strict; use warnings; use Data::Dumper; -use Encode qw/encode/; +use Encode qw; -use Xchat qw/:all/; +use Xchat qw<:all>; use lib get_info 'xchatdir'; use Xchat::XPI; @@ -140,11 +140,13 @@ hook_command 'HGREP', sub { help_text => 'HGREP , print users in the current context whose hostname matches text' }; -$ph = new Xchat::XPI name => 'Misc tools', - tag => 'Tools', - desc => 'Perl interpretor, URI escaper', - author => 'Vincent Pit (VPIT)', - email => 'perl@profvince.com', - url => 'http://www.profvince.com'; +$ph = Xchat::XPI->new( + name => 'Misc tools', + tag => 'Tools', + desc => 'Perl interpretor, URI escaper', + author => 'Vincent Pit (VPIT)', + email => 'perl@profvince.com', + url => 'http://www.profvince.com', +); 1;