archive

- Random tools & helpful resources for IRC
git clone git://git.acid.vegas/archive.git
Log | Files | Refs | Archive

dispatch.pl (400B)

      1 use strict;
      2 use warnings;
      3 use Irssi;
      4 use Irssi::Irc;
      5 
      6 sub event_default_command {
      7     my ($command, $server) = @_;
      8     return if (Irssi::settings_get_bool("dispatch_unknown_commands") == 0 || !$server);
      9     $server->send_raw($command);
     10     Irssi::signal_stop();
     11 }
     12 
     13 Irssi::settings_add_bool("misc", "dispatch_unknown_commands", 1);
     14 Irssi::signal_add_first("default command", "event_default_command");