1 files changed, 5 insertions, 3 deletions
diff --git a/Ivy.pm b/Ivy.pm
index bd979ca..8a1004f 100644
--- a/Ivy.pm
+++ b/Ivy.pm
@@ -41,7 +41,6 @@ use IO::Socket::Multicast;
 
 use vars qw($VERSION);
 use Fcntl qw(F_GETFL F_SETFL O_NONBLOCK);
-use bytes;
 
 # to compute the VERSION from the CVS tag (or if no tag, as the cvs file revision)
 my $TAG= q$Name:  $;
@@ -1367,10 +1366,13 @@ sub _getBonjour ($)
   # autre reseau, si ca embete qqun, qu'il me le dise
   push (@ivyBusAddrList, pack ("CCCC", 127,255,255,255));
   push (@ivyBusAddrList, (gethostbyname (hostname()))[4]);
-    foreach my $ivyBusAddr (@ivyBusAddrList) {
+
+  use bytes;
+  foreach my $ivyBusAddr (@ivyBusAddrList) {
     $addrInIvyBus = 1 unless (grep ($_ != 0, unpack ("C4",
-			      ($addr & $ivyBusAddr) ^ $addr)));
+			     ($addr & $ivyBusAddr) ^ $addr)));
   }
+  no bytes;
 
   if ($addrInIvyBus == 0) {
     carp "Warning[$appName]: Hello message from $peerName ignored,\n".