[PD-cvs] pd/src desire.tk,1.1.2.600.2.138,1.1.2.600.2.139

[Mathieu Bouchard]

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

Modified Files:
      Tag: desiredata
	desire.tk 
Log Message:
added icon_close for the Find Bar


Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.600.2.138
retrieving revision 1.1.2.600.2.139
diff -C2 -d -r1.1.2.600.2.138 -r1.1.2.600.2.139
*** desire.tk	26 Dec 2006 17:28:02 -0000	1.1.2.600.2.138
--- desire.tk	26 Dec 2006 18:50:18 -0000	1.1.2.600.2.139
***************
*** 5,9 ****
  # DesireData
  #   Copyright (c) 2004 by Mathieu Bouchard
! #   Copyright (c) 2005,2006 by Mathieu Bouchard and Chun Lee
  #
  # This program is free software; you can redistribute it and/or
--- 5,9 ----
  # DesireData
  #   Copyright (c) 2004 by Mathieu Bouchard
! #   Copyright (c) 2005,2006,2007 by Mathieu Bouchard and Chun Lee
  #
  # This program is free software; you can redistribute it and/or
***************
*** 435,441 ****
--- 435,443 ----
  		icon_plus    7 7 "8,8,8,127,8,8,8"
  		icon_minus   7 7 "0,0,0,127,0,0,0"
+ 		icon_close   7 7 "99,119,62,28,62,119,99"
  		icon_uparrow   7 5 "8,28,62,127,0"
  		icon_downarrow 7 5 "0,127,62,28,8"
  	} {
+ 		puts "create bitmap $name"
  		image create bitmap $name -data "#define z_width $w\n#define z_height $h
  			static unsigned char z_bits[] = { $values };"
***************
*** 2894,2898 ****
  		}
  		button {
! 			button $f.$type -border 1 -command " $self remove" -bitmap gray75 -height 8 -width 8
  			pack $f.$type -side left
  		}
--- 2896,2900 ----
  		}
  		button {
! 			button $f.$type -border 1 -command "$self remove" -image icon_close -width 9 -height 9
  			pack $f.$type -side left
  		}