From: Michael Andreen Date: Tue, 4 Aug 2009 12:55:13 +0000 (+0200) Subject: Fix, don't add functions with no attributes X-Git-Url: https://ruin.nu/git/?p=NDIRC.git;a=commitdiff_plain;h=cd394b6907c15c9a6a9161022a9e58f403f9618a Fix, don't add functions with no attributes --- diff --git a/Dispatcher.pm b/Dispatcher.pm index 16dae1d..8d7ffe9 100644 --- a/Dispatcher.pm +++ b/Dispatcher.pm @@ -67,7 +67,7 @@ sub load_class { my @subs = eval "$class->meta->get_method_list"; for my $c (@subs){ my $attr = eval "$class->meta->get_method('$c')->attributes"; - if ($attr){ + if (@$attr){ print "Command: $c"; my %c = (channels => ['all']); my @aliases;