From 1c8ea8aa31b2b71ac0e97dd215fbe4623c591e16 Mon Sep 17 00:00:00 2001
From: ijackson <ijackson>
Date: Wed, 16 Aug 2000 11:33:29 +0000
Subject: [PATCH] Remove debugging.

---
 bot.tcl | 1 -
 1 file changed, 1 deletion(-)

diff --git a/bot.tcl b/bot.tcl
index 87d8545..95febc4 100755
--- a/bot.tcl
+++ b/bot.tcl
@@ -49,7 +49,6 @@ proc onread {args} {
     global sock
     
     if {[gets $sock line] == -1} { set terminate 1; return }
-binary scan $line H* inhex; puts >$inhex<
     regsub -all "\[^ -\176\240-\376\]" $line ? line
     set org $line
     if {[regexp -nocase {^:([^ ]+) (.*)} $line dummy prefix remain]} {
-- 
2.30.2