X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/ircbot/blobdiff_plain/8a8d337d7d9fd2e8e15f8639ac70d02fc2003384..de4ab9b9210cf69271e226057617bcc9925cfe70:/bot.tcl 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]} {