[PD-cvs] pd/src desire.tk,1.1.2.239,1.1.2.240

[Mathieu Bouchard]

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

Modified Files:
      Tag: devel_0_39
	desire.tk 
Log Message:
properties_dialog should not be tied to the theme conf.


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.239
retrieving revision 1.1.2.240
diff -C2 -d -r1.1.2.239 -r1.1.2.240
*** desire.tk	13 Jun 2006 16:53:03 -0000	1.1.2.239
--- desire.tk	13 Jun 2006 17:09:26 -0000	1.1.2.240
***************
*** 4207,4215 ****
  		#set c [expr $c & 0xFCFCFC]
  		set c 0xFCFCFC
! 		set text_color [complement $look($name)]
! 		button $f.color -text $look($name) -font {Courier 10} -width 10 -pady 2 -fg $text_color \
! 			-command [list iemgui_choose_col $w $name.color $look($name)] \
! 			-relief sunken -background $look($name) \
! 			-highlightbackground [format #%6.6x $c] -activebackground [darker $look($name)]
  		set i 10
  		button $f.preset -text "..." -pady 2 -font {Helvetica 8} -command [list color_popup $w $w $name.color $i]
--- 4207,4215 ----
  		#set c [expr $c & 0xFCFCFC]
  		set c 0xFCFCFC
! 		set text_color [complement $_($self:$name)]
! 		button $f.color -text $_($self:$name) -font {Courier 10} -width 10 -pady 2 -fg $text_color \
! 			-command [list iemgui_choose_col $w $name.color $_($self:$name)] \
! 			-relief sunken -background $_($self:$name) \
! 			-highlightbackground [format #%6.6x $c] -activebackground [darker $_($self:$name)]
  		set i 10
  		button $f.preset -text "..." -pady 2 -font {Helvetica 8} -command [list color_popup $w $w $name.color $i]