pd/src desire.tk,1.1.2.600.2.138,1.1.2.600.2.139 - Pd-cvs

26 Dec 2006


      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
    	}