Switch to qw<>

[perl/scripts/xchat.git] / Xchat / XPI / Events.pm

diff --git a/Xchat/XPI/Events.pm b/Xchat/XPI/Events.pm
index 2c753e151e41e9db7b3ada44a97e78300fd10408..f387f8ae7e6bc6915caeeda9cf4ea70b1180cc44 100644 (file)
--- a/Xchat/XPI/Events.pm
+++ b/Xchat/XPI/Events.pm
@@ -3,7 +3,7 @@ package Xchat::XPI::Events;
 use strict;
 use warnings;
 
-use Xchat qw/:all/;
+use Xchat qw<:all>;
 
 use lib get_info 'xchatdir';
 use Xchat::XPI;
@@ -42,12 +42,12 @@ sub filter {
  return hook_print $from, \&_filter_cb, { data => \@_ };
 }
 
-use base qw/Exporter/;
+use base qw<Exporter>;
 
 our @EXPORT         = ();
 our %EXPORT_TAGS    = (
- 'funcs'  => [ qw/delay filter/ ],
- 'consts' => [ qw/DEFAULT_DELAY/ ]
+ 'funcs'  => [ qw<delay filter> ],
+ 'consts' => [ qw<DEFAULT_DELAY> ]
 );
 our @EXPORT_OK      = map { @$_ } values %EXPORT_TAGS;
 $EXPORT_TAGS{'all'} = [ @EXPORT_OK ];