From: Michael Andreen <harv@ruin.nu>
Date: Fri, 8 Jan 2010 01:29:26 +0000 (+0100)
Subject: Hide warning
X-Git-Url: https://ruin.nu/git/?p=NDIRC.git;a=commitdiff_plain;h=d9efbedb1f873e584e6ef43475ac896b2a49a050

Hide warning
---

diff --git a/Dispatcher.pm b/Dispatcher.pm
index 7dce098..6705349 100644
--- a/Dispatcher.pm
+++ b/Dispatcher.pm
@@ -99,6 +99,7 @@ sub has_command {
 	my ($self,$command,$channel) = @_;
 	$channel = lc $channel;
 
+	return 0 unless defined $command && defined $channel;
 	return 0 unless exists $self->commands->{$command};
 	return 0 unless exists $self->channels->{$channel};