[PD-cvs] pd/src desire.tk, 1.1.2.600.2.160, 1.1.2.600.2.161 TODO, 1.1.2.28.2.32, 1.1.2.28.2.33

chunlee chunlee at users.sourceforge.net
Thu Jan 11 16:05:28 CET 2007


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

Modified Files:
      Tag: desiredata
	desire.tk TODO 
Log Message:
small change/fix to FloatBox and NumBox


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.160
retrieving revision 1.1.2.600.2.161
diff -C2 -d -r1.1.2.600.2.160 -r1.1.2.600.2.161
*** desire.tk	11 Jan 2007 13:34:23 -0000	1.1.2.600.2.160
--- desire.tk	11 Jan 2007 15:05:24 -0000	1.1.2.600.2.161
***************
*** 2134,2137 ****
--- 2134,2138 ----
  	if {$@edit} {return}
  	set @edit 1; $self changed edit
+ 	if {[[$self class] <= AtomBox]} {set @clear 1}
  }
  
***************
*** 2171,2175 ****
  		-window $t -anchor nw -tags "${self}text $self text"
  	$t configure -pady 0 -padx 0
! 	$t insert 1.0 [$self filter_text 1]
  	$self resize none
  	focus $t
--- 2172,2177 ----
  		-window $t -anchor nw -tags "${self}text $self text"
  	$t configure -pady 0 -padx 0
! 	$t insert 1.0 $@text
! 	#$t insert 1.0 [$self filter_text 1]
  	$self resize none
  	focus $t
***************
*** 2197,2200 ****
--- 2199,2203 ----
  	set c [$@canvas widget]
  	set t $c.${self}text
+ 	if {[[$self class] <= AtomBox]} {if {$@clear} {$t delete 1.0 1.end; set @clear 0}}
  	switch -- $key {
  		Tab {
***************
*** 5209,5214 ****
  
  # why does this exist?
  def AtomBox set {text} {
! 	set @text $text
  	$self changed
  }
--- 5212,5218 ----
  
  # why does this exist?
+ # this exists because server sends this for floatbox: -> x806ac20 set 23.000000
  def AtomBox set {text} {
! 	set @text [string range $text 0 [expr $@w-1]]; #perhaps server should take care of this..
  	$self changed
  }

Index: TODO
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/TODO,v
retrieving revision 1.1.2.28.2.32
retrieving revision 1.1.2.28.2.33
diff -C2 -d -r1.1.2.28.2.32 -r1.1.2.28.2.33
*** TODO	11 Jan 2007 13:34:25 -0000	1.1.2.28.2.32
--- TODO	11 Jan 2007 15:05:26 -0000	1.1.2.28.2.33
***************
*** 12,19 ****
  [x] fix {\;} {\$1} in TextBox, loads fine, but there is bug in redraw
  [ ] fix gop
      [x] gop content drawn on wrong canvas
      [x] gop content should not be able to move...
      [x] gop content should not be able to make wire
!     [x]  rightclick open don't work on nested gop
  [x] futurewire broken
      [x] drawn from inlet
--- 12,20 ----
  [x] fix {\;} {\$1} in TextBox, loads fine, but there is bug in redraw
  [ ] fix gop
+     [ ] reimplement View get_canvas so that it does not rely on [focus]
      [x] gop content drawn on wrong canvas
      [x] gop content should not be able to move...
      [x] gop content should not be able to make wire
!     [x] rightclick open don't work on nested gop
  [x] futurewire broken
      [x] drawn from inlet





More information about the Pd-cvs mailing list