[NetScript CVS] CVS: netscript2/src/perl/NetScript/Libraries DebugLibrary.pm,1.6,1.7

[Jan T. <de...@us...>]

Update of /cvsroot/net-script/netscript2/src/perl/NetScript/Libraries
In directory usw-pr-cvs1:/tmp/cvs-serv16261

Modified Files:
	DebugLibrary.pm 
Log Message:


Index: DebugLibrary.pm
===================================================================
RCS file: /cvsroot/net-script/netscript2/src/perl/NetScript/Libraries/DebugLibrary.pm,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** DebugLibrary.pm	7 Jul 2002 14:34:37 -0000	1.6
--- DebugLibrary.pm	21 Aug 2002 10:35:03 -0000	1.7
***************
*** 60,63 ****
--- 60,64 ----
              $NetScript::Libraries::DebugLibrary::DEBUG_EVENT,
              "debugEvent", $this );
+             
      my $eventRelay = $this -> interpreter() -> getEventRelay();
      $eventRelay -> addEventListener( $eventListener1 );