diff options
author | Rich Healey <richh@boxdice.com.au> | 2011-01-05 00:09:10 +0000 |
---|---|---|
committer | Rich Healey <richh@boxdice.com.au> | 2011-01-05 00:09:10 +0000 |
commit | 45a8a8b30a6723dd891cd3482d081a208b2b5792 (patch) | |
tree | addc3721ff1f59a594d910a4499121a3357d3bff /auto-server | |
parent | feature-tests: looking at ways to read from a DATA fh, and redirect normal (diff) | |
parent | Added support for tab completion. (diff) | |
download | irssi-scripts-45a8a8b30a6723dd891cd3482d081a208b2b5792.tar.gz irssi-scripts-45a8a8b30a6723dd891cd3482d081a208b2b5792.zip |
Merge branch 'tab_completion'join_password_protected_channels
Diffstat (limited to 'auto-server')
-rw-r--r-- | auto-server/auto_server.pl | 16 |
1 files changed, 15 insertions, 1 deletions
diff --git a/auto-server/auto_server.pl b/auto-server/auto_server.pl index 7054664..a9f6645 100644 --- a/auto-server/auto_server.pl +++ b/auto-server/auto_server.pl @@ -55,7 +55,7 @@ our %IRSSI = ( license => 'Public Domain', ); -my $channel_map; +my $channel_map = {}; my @hack_channels; my $pending_joins; @@ -104,6 +104,7 @@ sub haxy_print_hook { sub parse_channel_map { #my $data = Irssi::settings_get_str('joinplus_server_maps'); + unbind_completion(); my $data = retrieve_channels(); my @items = split /\s+/, $data; if (@items % 2 == 0) { @@ -113,6 +114,19 @@ sub parse_channel_map { $channel_map = {}; } _debug_print Dumper($channel_map); + bind_completion(); +} + +sub bind_completion { + foreach(%$channel_map) { + Irssi::command_bind("join+ $_", \&join_plus); + } +} + +sub unbind_completion { + foreach(%$channel_map) { + Irssi::command_unbind("join+ $_", \&join_plus); + } } sub join_plus { |