X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=hl.pl;h=5b67967ec415e0b07257c06280ca3b209e6bec09;hb=8e068f0fd1bd7238d627a66c86b1b8335b975e71;hp=97a80af38e7a4b922a76c69721d47b26d67e13eb;hpb=304986c32ddd8652698a79b909da39e8656c2f8b;p=perl%2Fscripts%2Fxchat.git

diff --git a/hl.pl b/hl.pl
index 97a80af..5b67967 100755
--- a/hl.pl
+++ b/hl.pl
@@ -9,7 +9,7 @@ use lib get_info 'xchatdir';
 use Xchat::XPI;
 use Xchat::XPI::Events qw/filter/;
 
-our $VERSION = '0.02';
+our $VERSION = '0.04';
 
 my $ph;
 
@@ -28,23 +28,26 @@ my %hl = (
  '#cpantesters' => [ qw/
     Acme-CPANAuthors-You-re_using
     B-RecDeparse
+    Bit-MorseSignals
     CPANPLUS-Dist-Gentoo
+    IPC-MorseSignals
     Lexical-Types
     Linux-SysInfo
-    MorseSignals
     Perl-Critic-Policy-Dynamic-NoIndirect
     Regexp-Wildcards
     Scalar-Vec-Util
     Scope-Upper
     Sub-Nary
+    Sub-Op
     Sub-Prototype-Util
     Test-Valgrind
     Thread-Cleanup
     Variable-Magic
+    autovivification-
     indirect-
     rgit-
     subs-auto
-    with-
+    \bwith-
   / ],
 );
 
@@ -84,12 +87,14 @@ filter 'Channel Action Hilight' => sub {
  }
 } => 'Channel Action';
 
-$ph = new Xchat::XPI name   => 'Smart highlighting',
-                     tag    => 'HL',
-                     desc   => 'Highlight on private messages',
-                     author => 'Vincent Pit (VPIT)',
-                     email  => 'perl@profvince.com',
-                     url    => 'http://www.profvince.com';
+$ph = Xchat::XPI->new(
+ name   => 'Smart highlighting',
+ tag    => 'HL',
+ desc   => 'Highlight on private messages',
+ author => 'Vincent Pit (VPIT)',
+ email  => 'perl@profvince.com',
+ url    => 'http://www.profvince.com',
+);
  
 1;