X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fchannel.pl;h=147c150af6bd307e71261e4ef547aae2df306f98;hb=20b0104deaeab77fa7ab1444dbcedfcdbf5865f8;hp=e1ef761083b620b1e8372c098e7035ceae44e967;hpb=07ea293f3919d2da76220b5fbc55b734008ed44c;p=spider.git

diff --git a/cmd/show/channel.pl b/cmd/show/channel.pl
index e1ef7610..147c150a 100644
--- a/cmd/show/channel.pl
+++ b/cmd/show/channel.pl
@@ -4,9 +4,10 @@
 # $Id$
 #
 
+use strict;
 my ($self, $line) = @_;
-my @list = /\s+/, $line;		  # generate a list of callsigns
-@list = ($self->call) if (!@list || $self->priv < 9);  # my channel if no callsigns
+my @list = split /\s+/, $line;		  # generate a list of callsigns
+@list = ($self->call) if !@list || $self->priv < 9;  # my channel if no callsigns
 
 my $call;
 my @out;