Thread: [pastebot-cvs] pastebot/Client IRC.pm,1.1.1.1,1.2
Status: Beta
Brought to you by:
rcaputo
From: <rc...@us...> - 2002-10-15 22:09:29
|
Update of /cvsroot/pastebot/pastebot/Client In directory usw-pr-cvs1:/tmp/cvs-serv17608/Client Modified Files: IRC.pm Log Message: Insignificant tweak to the debugging output. Index: IRC.pm =================================================================== RCS file: /cvsroot/pastebot/pastebot/Client/IRC.pm,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -C2 -d -r1.1.1.1 -r1.2 *** IRC.pm 8 May 2002 16:11:05 -0000 1.1.1.1 --- IRC.pm 15 Oct 2002 22:09:24 -0000 1.2 *************** *** 287,291 **** my ($state, $event, $args, $heap) = @_[STATE, ARG0, ARG1, HEAP]; $args ||= [ ]; ! print "default $state = $event @$args\n"; $heap->{seen_traffic} = 1; return 0; --- 287,291 ---- my ($state, $event, $args, $heap) = @_[STATE, ARG0, ARG1, HEAP]; $args ||= [ ]; ! print "default $state = $event (@$args)\n"; $heap->{seen_traffic} = 1; return 0; |