From aa10eef988d4df798d086f569c154752e4dd80fc Mon Sep 17 00:00:00 2001 From: dms Date: Wed, 31 Jan 2001 13:18:32 +0000 Subject: [PATCH] &ChanConfList() typos git-svn-id: https://svn.code.sf.net/p/infobot/code/trunk/blootbot@284 c11ca15a-4712-0410-83d8-924469b57eb5 --- src/core.pl | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) diff --git a/src/core.pl b/src/core.pl index 860d6fb..14b8184 100644 --- a/src/core.pl +++ b/src/core.pl @@ -128,16 +128,11 @@ sub IsParam { # Return: array of channels sub ChanConfList { my $param = $_[0]; - my %chan = &getChanConfList($param); - return unless (defined $param); + my %chan = &getChanConfList($param); ### TODO: -option is included aswell though. - if ($chan{_default}) { - return keys %channels; - } else { - return keys %chan; - } + return keys %chan; } ##### -- 2.39.2