try not to loose notifications if notification-daemon stuck from notifications havoc
This commit is contained in:
@@ -29,10 +29,17 @@ sub hookfn {
|
|||||||
$text =~ s/\"/\\"/g;
|
$text =~ s/\"/\\"/g;
|
||||||
my $topic = sprintf("%s at %s says:\n", $nick, $channel);
|
my $topic = sprintf("%s at %s says:\n", $nick, $channel);
|
||||||
$active = 1;
|
$active = 1;
|
||||||
threads->create(\¬ify, $topic, $text)->detach;
|
my $t = undef;
|
||||||
|
|
||||||
|
do {
|
||||||
|
$t = threads->create(\¬ify, $topic, $text);
|
||||||
|
sleep 1 unless(defined($t));
|
||||||
|
} unless (defined($t));
|
||||||
|
|
||||||
|
$t->detach;
|
||||||
|
|
||||||
if ($active == 1) {
|
if ($active == 1) {
|
||||||
hook_timer( 100, \&timeraction);
|
hook_timer( 500, \&timeraction);
|
||||||
}
|
}
|
||||||
|
|
||||||
return EAT_NONE;
|
return EAT_NONE;
|
||||||
|
|||||||
Reference in New Issue
Block a user