diff options
| author |   William Heimbigner <william.heimbigner@gmail.com> | 2007-06-28 23:48:48 +0000 |
|---|---|---|
| committer | William Heimbigner <william.heimbigner@gmail.com> | 2007-06-28 23:48:48 +0000 |
| commit | 6907da0a5da3d45a91c3ac4893e5b890200b27eb (patch) | |
| tree | 5a61df15a30b6d0aefa6c6e72e7eab2d8f03de1f /modules/command.pl | |
| parent | 638d9eae9e63755e26f9843985597e6f1c7c5f8e (diff) | |
modularized stuff, fixed alert logic, simplified stuff, updated TODO
Diffstat (limited to 'modules/command.pl')
| -rw-r--r-- | modules/command.pl | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/modules/command.pl b/modules/command.pl index 41d65fb..fe299fd 100644 --- a/modules/command.pl +++ b/modules/command.pl @@ -12,11 +12,11 @@ sub do_command foreach my $command ( @{$::commands->{command}} ) { if (defined($command->{flag})) { - next unless defined($::xusers->{$nick}); - next unless defined($::xusers->{$nick}->{flags}); - next unless (grep {$_ eq $command->{flag}} split('', $::xusers->{$nick}->{flags})); - if ($::xusers->{$nick}->{host} ne 'IDENTIFY') { - next unless leq($::xusers->{$nick}->{host}, $event->{host}); + next unless defined($::users->{person}->{$nick}); + next unless defined($::users->{person}->{$nick}->{flags}); + next unless (grep {$_ eq $command->{flag}} split('', $::users->{person}->{$nick}->{flags})); + if ($::users->{person}->{$nick}->{host} ne 'IDENTIFY') { + next unless leq($::users->{person}->{$nick}->{host}, $event->{host}); } else { if ( $cmd =~ /$command->{cmd}/ ){ |