[PD-cvs] pd/src desire.tk,1.1.2.600.2.246,1.1.2.600.2.247

[chunlee]

Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8848

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
auto completion fix


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.246
retrieving revision 1.1.2.600.2.247
diff -C2 -d -r1.1.2.600.2.246 -r1.1.2.600.2.247
*** desire.tk	20 Jul 2007 00:50:10 -0000	1.1.2.600.2.246
--- desire.tk	20 Jul 2007 01:03:18 -0000	1.1.2.600.2.247
***************
*** 2312,2316 ****
  	switch -- $key {
  		Tab {
! 			if {[$self class] != "FloatBox"} {
  				$self propose_completions; $widget configure -state disabled
  			}
--- 2312,2316 ----
  	switch -- $key {
  		Tab {
! 			if {[$self class] == "ObjectBox"} {
  				$self propose_completions; $widget configure -state disabled
  			}
***************
*** 3278,3281 ****
--- 3278,3282 ----
  	if {[winfo exists $f.completion]} {
  		set @hist [linsert $@hist 0 [string range $@comp 0 [expr [string first ":" $@comp 0]-1]]]
+ 		set @histi 0
  		$self replace
  		destroy $f.completion