mirrors/weechat-opal
1
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

antifuck: use priority_low for autoparts

Browse Source
This commit is contained in:
wowaname 2017-01-24 05:59:21 +00:00
parent c723d83d45
commit 278ce87640
1 changed files with 8 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
scripts/antifuck.pl
View File

@ -244,25 +244,23 @@ sub irc_join_delay
{ {
my $buffer = shift; my $buffer = shift;
for my $server (values %part) { for my $server (keys %part) {
my $chans = ''; my $chans = '';
for my $chan (keys %$server) { for my $chan (keys %{$part{$server}}) {
if (length($chans) + length($chan) > 500) { if (length($chans) + length($chan) > 500) {
weechat::command($buffer, "/part $chans"); weechat::hook_signal_send('irc_input_send',
#weechat::hook_signal_send('irc_input_send', weechat::WEECHAT_HOOK_SIGNAL_STRING,
# weechat::WEECHAT_HOOK_SIGNAL_STRING, "$server;;priority_low;;/part $chans");
# "$server;;priority_low;;/part $chans");
$chans = ''; $chans = '';
} }
$chans .= "$chan,"; $chans .= "$chan,";
} }
weechat::command($buffer, "/part $chans"); weechat::hook_signal_send('irc_input_send',
#weechat::hook_signal_send('irc_input_send', weechat::WEECHAT_HOOK_SIGNAL_STRING,
# weechat::WEECHAT_HOOK_SIGNAL_STRING, "$server;;priority_low;;/part $chans");
# "$server;;priority_low;;/part $chans");
} }
$timeout_cb = ''; $timeout_cb = '';
%part = (); %part = ();