Switch to qw<>

[perl/scripts/xchat.git] / mpd.pl

diff --git a/mpd.pl b/mpd.pl
index ca732888f329a3a807dd3b2485e6b5c77fd68be2..4877b52349791f1f8432a228380958cef2044474 100755 (executable)
--- a/mpd.pl
+++ b/mpd.pl
@@ -5,7 +5,7 @@ use warnings;
 
 use Audio::MPD;
 
-use Xchat qw/:all/;
+use Xchat qw<:all>;
 
 use lib get_info 'xchatdir'; 
 use Xchat::XPI;
@@ -50,7 +50,7 @@ hook_command $_, sub {
  return EAT_ALL;
 }, {
  help_text => "$_, output which song is currently played by mpd"
-} for qw/MPD NP/;
+} for qw<MPD NP>;
 
 $ph = Xchat::XPI->new(
  name   => 'MPD Client',