summaryrefslogtreecommitdiff
path: root/net/tkicb/patches/patch-aa
diff options
context:
space:
mode:
Diffstat (limited to 'net/tkicb/patches/patch-aa')
-rw-r--r--net/tkicb/patches/patch-aa70
1 files changed, 0 insertions, 70 deletions
diff --git a/net/tkicb/patches/patch-aa b/net/tkicb/patches/patch-aa
deleted file mode 100644
index c9cf3ca6192..00000000000
--- a/net/tkicb/patches/patch-aa
+++ /dev/null
@@ -1,70 +0,0 @@
-$NetBSD: patch-aa,v 1.4 2000/09/03 12:57:22 wiz Exp $
---- tcl/protocol.tcl.orig Thu Jun 29 10:13:05 2000
-+++ tcl/protocol.tcl Mon Jun 1 14:53:11 1998
-@@ -379,20 +379,20 @@
- proc ICB:PERSONAL {sender args} {
- TabHist:Add $sender
-
-- UTIL:EchoArgs [list $sender personal] "<*$sender*> " $args
-+ UTIL:EchoArgs [list $sender personal] "[UTIL:TimeStamp] <*$sender*> " $args
- }
-
- proc ICB:OPEN {sender args} {
-- UTIL:EchoArgs [list $sender open] "<$sender> " $args
-+ UTIL:EchoArgs [list $sender open] "[UTIL:TimeStamp] <$sender> " $args
- }
-
- proc ICB:ERROR {args} {
-- UTIL:EchoArgs error "\[=Error=\] " $args
-+ UTIL:EchoArgs error "[UTIL:TimeStamp] \[=Error=\] " $args
- }
-
- proc ICB:BEEP {sender args} {
- TabHist:Add $sender
-- UI:Output -type beep "\[=Beep!=\] $sender sent you a beep."
-+ UI:Output -type beep "[UTIL:TimeStamp] \[=Beep!=\] $sender sent you a beep."
- }
-
- proc ICB:STATUS {code argList} {
-@@ -410,15 +410,15 @@
-
- case $code {
- Notify-On {
-- set prefix "\[=ON @ $timeStamp=\]"
-+ set prefix "[UTIL:TimeStamp] \[=ON=\]"
- }
-
- Notify-Off {
-- set prefix "\[=OFF @ $timeStamp=\]"
-+ set prefix "[UTIL:TimeStamp] \[=OFF=\]"
- }
-
- default {
-- set prefix "\[=$code=\]"
-+ set prefix "[UTIL:TimeStamp] \[=$code=\]"
- }
- }
-
-@@ -429,11 +429,11 @@
- #
- # This doesn't seem to have any purpose.
- #
-- # UI:Output -type loginok "\[=LOGINOK=\] $sender $args"
-+ # UI:Output -type loginok "[UTIL:TimeStamp] \[=LOGINOK=\] $sender $args"
- }
-
- proc ICB:IMPORTANT {sender args} {
-- UTIL:EchoArgs important "\[=$sender@[UTIL:TimeStamp]=\] " $args
-+ UTIL:EchoArgs important "[UTIL:TimeStamp] \[=$sender@[UTIL:TimeStamp]=\] " $args
- }
-
- proc ICB:EXIT {sender args} {
-@@ -445,7 +445,7 @@
- }
-
- proc ICB:PONG {sender args} {
-- UTIL:EchoArgs pong "\[=PONG=\] $sender " $args
-+ UTIL:EchoArgs pong "[UTIL:TimeStamp] \[=PONG=\] $sender " $args
- }
-
- proc ICB:AddConnectCallBack {command} {