[PD-cvs] pd/src desire.tk,1.1.2.93,1.1.2.94
chunlee
chunlee at users.sourceforge.net
Tue Nov 1 18:23:18 CET 2005
- Previous message: [PD-cvs] pd/src desire.tk,1.1.2.92,1.1.2.93
- Next message: [PD-cvs] abstractions/footils/list-abs list-abs-help.pd, NONE, 1.1 list-abs.pd, NONE, 1.1 list-equalize-help.pd, NONE, 1.1 list-equalize.pd, NONE, 1.1 list-normalize-help.pd, NONE, 1.1 list-normalize.pd, NONE, 1.1 README, 1.1, 1.2
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv1935
Modified Files:
Tag: devel_0_39
desire.tk
Log Message:
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.93
retrieving revision 1.1.2.94
diff -C2 -d -r1.1.2.93 -r1.1.2.94
*** desire.tk 1 Nov 2005 16:51:02 -0000 1.1.2.93
--- desire.tk 1 Nov 2005 17:23:16 -0000 1.1.2.94
***************
*** 1162,1166 ****
def* textbox update_size {} {
global font
! set @xs [expr $font(padx)+$font(width)*([expr [string length $@text]]-$@valid)]
set @ys [expr $font(pady)+$font(height)]
}
--- 1162,1167 ----
def* textbox update_size {} {
global font
! #added +1 below that fixs the initial box size on my side - chun
! set @xs [expr $font(padx)+$font(width)*([expr [string length $@text]+1]-$@valid)]
set @ys [expr $font(pady)+$font(height)]
}
- Previous message: [PD-cvs] pd/src desire.tk,1.1.2.92,1.1.2.93
- Next message: [PD-cvs] abstractions/footils/list-abs list-abs-help.pd, NONE, 1.1 list-abs.pd, NONE, 1.1 list-equalize-help.pd, NONE, 1.1 list-equalize.pd, NONE, 1.1 list-normalize-help.pd, NONE, 1.1 list-normalize.pd, NONE, 1.1 README, 1.1, 1.2
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the Pd-cvs
mailing list