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
}