From 385503cad8030ec6ddd5017f82619768e59c10eb Mon Sep 17 00:00:00 2001 From: bustico Date: Tue, 7 Jul 2009 07:17:01 +0000 Subject: fix lack of declaration which made ivy.pm to die on etch --- Ivy.pm | 6 +++--- debian/changelog | 6 ++++++ 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/Ivy.pm b/Ivy.pm index e57f4d6..78d5cd0 100644 --- a/Ivy.pm +++ b/Ivy.pm @@ -41,6 +41,7 @@ use IO::Socket::Multicast; use vars qw($VERSION); use Fcntl qw(F_GETFL F_SETFL O_NONBLOCK); +use Socket qw(TCP_NODELAY); # to compute the VERSION from the CVS tag (or if no tag, as the cvs file revision) my $TAG= q$Name: $; @@ -218,12 +219,11 @@ use constant MAX_TIMOUT => 1000; # small bursts of information without getting an immediate response, # where timely delivery of data is required (the canonical example is # mouse movements). +# Since Ivy is most of the time used to send events, we will priviligiate +# lag over throughtput, so _TCP_NO_DELAY_ACTIVATED is set to 1 use constant TCP_NO_DELAY_ACTIVATED => 1; -# Since Ivy is most of the time used to send events, we will priviligiate -# lag over throughtput, so _TCP_NO_DELAY_ACTIVATED is set to 1 -use constant MAX_TIMOUT => 1000; # pour pouvoir employer les regexps perl. Attention lors de l'utilisation # ne pas mettre un \n dans une chaine entre "" car l'\n sera interprete. use constant REG_PERLISSISME => ('w' => '[a-zA-Z0-9_]', diff --git a/debian/changelog b/debian/changelog index 1c4b681..36bed66 100644 --- a/debian/changelog +++ b/debian/changelog @@ -1,3 +1,9 @@ +ivy-perl (4.25-9) unstable; urgency=low + + * fix lack of declaration which made ivy.pm to die on etch + + -- Alexandre Bustico Mon, 6 July 2009 16:43:00 +0200 + ivy-perl (4.25-8) unstable; urgency=low * New upstream version: desactivation of the nagle buffering for TCP sockets, since ivy is most of the time used to send events, -- cgit v1.1