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;
for my $server (values %part) {
for my $server (keys %part) {
my $chans = '';
for my $chan (keys %$server) {
for my $chan (keys %{$part{$server}}) {
if (length($chans) + length($chan) > 500) {
weechat::command($buffer, "/part $chans");
#weechat::hook_signal_send('irc_input_send',
# weechat::WEECHAT_HOOK_SIGNAL_STRING,
# "$server;;priority_low;;/part $chans");
weechat::hook_signal_send('irc_input_send',
weechat::WEECHAT_HOOK_SIGNAL_STRING,
"$server;;priority_low;;/part $chans");
$chans = '';
}
$chans .= "$chan,";
}
weechat::command($buffer, "/part $chans");
#weechat::hook_signal_send('irc_input_send',
# weechat::WEECHAT_HOOK_SIGNAL_STRING,
# "$server;;priority_low;;/part $chans");
weechat::hook_signal_send('irc_input_send',
weechat::WEECHAT_HOOK_SIGNAL_STRING,
"$server;;priority_low;;/part $chans");
}
$timeout_cb = '';
%part = ();