From 84b350237da0a8f79943c8cb22df178d067d3b0e Mon Sep 17 00:00:00 2001 From: vales Date: Fri, 30 May 2003 13:39:50 +0000 Subject: -no more bug when unbinding regexps --- Ivy.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'Ivy.pm') diff --git a/Ivy.pm b/Ivy.pm index 7a2c08d..0a78821 100644 --- a/Ivy.pm +++ b/Ivy.pm @@ -746,7 +746,7 @@ sub bindRegexp $self->[recCbList][$id]->[1] = []; # on envoie le mesage delregexp foreach my $fd (values %{$self->[sockList]}) { - send ($fd, sprintf (MSG_FMT, DELREGEXP, $id), 0) + send ($fd, sprintf (MSG_FMT, DELREGEXP, $id,""), 0) or $self->_removeFileDescriptor ($fd); } } -- cgit v1.1