diff options
Diffstat (limited to 'Ivy.pm')
-rw-r--r-- | Ivy.pm | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -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_]', |