[Sguil-cvs] sguil/client sguil.tk,1.132,1.133

[Steve H. <sha...@us...>]

Update of /cvsroot/sguil/sguil/client
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24574

Modified Files:
	sguil.tk 
Log Message:
Search box + Enter Key = Happy Bamm -srh


Index: sguil.tk
===================================================================
RCS file: /cvsroot/sguil/sguil/client/sguil.tk,v
retrieving revision 1.132
retrieving revision 1.133
diff -C2 -d -r1.132 -r1.133
*** sguil.tk	27 Jul 2004 15:09:19 -0000	1.132
--- sguil.tk	28 Jul 2004 20:47:10 -0000	1.133
***************
*** 2369,2373 ****
       pack $dataTextFrame -side left -anchor w -fill both -expand true
      set dataSearchFrame [frame $packetFrame.dataSearchFrame -bd 0]
! 	  set dataSearchText [entry $dataSearchFrame.dataSearchText -width 20 -background white -font ourFixedFont]
  	  set dataSearchButton [button $dataSearchFrame.dataSearchButton -state disabled -text "Search Packet Payload"\
  	    -command "SearchData"]
--- 2369,2373 ----
       pack $dataTextFrame -side left -anchor w -fill both -expand true
      set dataSearchFrame [frame $packetFrame.dataSearchFrame -bd 0]
! 	  set dataSearchText [entryfield $dataSearchFrame.dataSearchText -width 20 -background white]
  	  set dataSearchButton [button $dataSearchFrame.dataSearchButton -state disabled -text "Search Packet Payload"\
  	    -command "SearchData"]
***************
*** 2380,2385 ****
  	  pack $dataSearchText $dataSearchButton $dataSearchType $dataSearchCaseCheck -side left -fill x
       set dataFrameMenu [menu $dataFrame.dataFrameMenu -tearoff 0]
!       $dataFrameMenu add command -label "Show/Hide Search Frame"\
  	      -command "ShowHideSearch"
       foreach childWin [winfo children $dataTextFrame] {
  	bind $childWin <ButtonPress-3> {
--- 2380,2388 ----
  	  pack $dataSearchText $dataSearchButton $dataSearchType $dataSearchCaseCheck -side left -fill x
       set dataFrameMenu [menu $dataFrame.dataFrameMenu -tearoff 0]
!        $dataFrameMenu add command -label "Show/Hide Search Frame"\
  	      -command "ShowHideSearch"
+      bind [$dataSearchText component entry] <Return> {
+        SearchData
+      }
       foreach childWin [winfo children $dataTextFrame] {
  	bind $childWin <ButtonPress-3> {