From 0816da664099746d962ee06b7de71be7c570e069 Mon Sep 17 00:00:00 2001
From: Ailin Nemui
Date: Mon, 2 Feb 2015 14:02:20 +0100
Subject: Localise the $/ special variable.

Follow-up to #129 to fix all $/ inside the scripts archive. Also fix
dejunk to not break scripts using the assumed default. Note, other
scripts like cmpchans might still break your scripts due to the global
nature of the Perl.
---
 scripts/hlbot.pl | 1 -
 1 file changed, 1 deletion(-)

(limited to 'scripts/hlbot.pl')

diff --git a/scripts/hlbot.pl b/scripts/hlbot.pl
index d9e5113..1d8cfd6 100644
--- a/scripts/hlbot.pl
+++ b/scripts/hlbot.pl
@@ -209,7 +209,6 @@ my $proto = getprotobyname('udp');
 my $paddr = sockaddr_in($listen_port, $iaddr);
 socket(S, PF_INET, SOCK_DGRAM, $proto)   || die "socket: $!\n";
 bind(S, $paddr)                          || die "bind: $!\n";
-$| = 1;
 
 # Set input and signals etc. irssi related stuff.
 Irssi::input_add(fileno(S), INPUT_READ, "run_bot", "");
-- 
cgit v1.2.3