diff options
Diffstat (limited to 'net/tkicb/patches/patch-aa')
-rw-r--r-- | net/tkicb/patches/patch-aa | 70 |
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} { |