[Sguil-cvs] sguil/server/lib SguildSensorAgentComms.tcl,1.9,1.10

[Bamm V. <ba...@us...>]

Update of /cvsroot/sguil/sguil/server/lib
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1533

Modified Files:
	SguildSensorAgentComms.tcl 
Log Message:
Typos in dupe event checks fixed.


Index: SguildSensorAgentComms.tcl
===================================================================
RCS file: /cvsroot/sguil/sguil/server/lib/SguildSensorAgentComms.tcl,v
retrieving revision 1.9
retrieving revision 1.10
diff -C2 -d -r1.9 -r1.10
*** SguildSensorAgentComms.tcl	15 Sep 2005 20:05:44 -0000	1.9
--- SguildSensorAgentComms.tcl	16 Sep 2005 17:25:49 -0000	1.10
***************
*** 43,47 ****
      # Check for a potential dupe. Can happen if we get busy and the confirmation
      # doesn't make it back to BY quick enough.
!     set eventID "${sid}.{$cid}"
      if { [array exists LAST_EVENT_ID] \
        && [info exists LAST_EVENT_ID($sensorName)] \
--- 43,48 ----
      # Check for a potential dupe. Can happen if we get busy and the confirmation
      # doesn't make it back to BY quick enough.
!     set eventID "${sid}.${cid}"
! 
      if { [array exists LAST_EVENT_ID] \
        && [info exists LAST_EVENT_ID($sensorName)] \
***************
*** 52,57 ****
  
      }
- 
- 
      
      # Insert Event Hdr
--- 53,56 ----
***************
*** 136,140 ****
  
      # Update last event
!     set LAST_EVENT_ID(sensorName) $eventID
  
  }
--- 135,139 ----
  
      # Update last event
!     set LAST_EVENT_ID($sensorName) $eventID
  
  }