tuxaator-perl.patch

   1 --- ./BotCore.pm~       2005-07-18 21:17:25.000000000 +0300
   2 +++ ./BotCore.pm        2005-07-19 02:26:43.000000000 +0300
   3 @@ -190,7 +190,7 @@
   4                         print "$handler ";
   5                         # add a pointer to the module
   6                         $handlers{$handler}->{'id'} = $id;
   7 -                       $self->register_msg_handler($handler,%handlers->{$handler});
   8 +                       $self->register_msg_handler($handler, $handlers{$handler});
   9                 };
  10         };
  11         # we need to store the command names somewhere