[PD-cvs] pd/src desire.tk,1.1.2.81,1.1.2.82
Mathieu Bouchard
matju at users.sourceforge.net
Tue Sep 27 13:07:36 CEST 2005
- Previous message: [PD-cvs] externals/grill/xsample/source groove.cpp, 1.33, 1.34 main.h, 1.37, 1.38 record.cpp, 1.18, 1.19 xsample-Info.plist, 1.1, 1.2
- Next message: [PD-cvs] pd/src desire.c,1.1.2.30,1.1.2.31
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv32680
Modified Files:
Tag: devel_0_39
desire.tk
Log Message:
t_canvas doesn't preserve index numbers from when file was last saved, so why should def canvas add,del ?
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.81
retrieving revision 1.1.2.82
diff -C2 -d -r1.1.2.81 -r1.1.2.82
*** desire.tk 24 Sep 2005 23:21:15 -0000 1.1.2.81
--- desire.tk 27 Sep 2005 11:07:34 -0000 1.1.2.82
***************
*** 1258,1263 ****
#-----------------------------------------------------------------------------------#
def* canvas window_title {title} {wm title .x$self $title}
! def* canvas add {i obj} {lset @children $i $obj}
! def* canvas del {i} {lset @children $i ""}
def canvas delete_selection {} {
--- 1258,1274 ----
#-----------------------------------------------------------------------------------#
def* canvas window_title {title} {wm title .x$self $title}
! #def* canvas add {i obj} {lset @children $i $obj}
! #def* canvas del {i} {lset @children $i ""}
!
! def* canvas add {obj} {
! set i [lsearch $@children $obj]
! if {!$i} {lappend @children $obj}
! }
!
! def* canvas del {obj} {
! set i [lsearch $@children $obj]
! if {$i} {set @children [lreplace $@children $i $i]}
! }
!
def canvas delete_selection {} {
- Previous message: [PD-cvs] externals/grill/xsample/source groove.cpp, 1.33, 1.34 main.h, 1.37, 1.38 record.cpp, 1.18, 1.19 xsample-Info.plist, 1.1, 1.2
- Next message: [PD-cvs] pd/src desire.c,1.1.2.30,1.1.2.31
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the Pd-cvs
mailing list