Update of /cvsroot/pure-data/pd/src In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18302
Modified Files: Tag: devel_0_39 desire.tk Log Message: fixed the bug in Canvas save
Index: desire.tk =================================================================== RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v retrieving revision 1.1.2.536 retrieving revision 1.1.2.537 diff -C2 -d -r1.1.2.536 -r1.1.2.537 *** desire.tk 30 Oct 2006 02:36:05 -0000 1.1.2.536 --- desire.tk 30 Oct 2006 12:02:49 -0000 1.1.2.537 *************** *** 1232,1236 **** if {$@subpatch} {return [$@canvas save]} $self checkgeometry ! if {$@name != ""} { pd .$self savetofile $@name $@folder } else { --- 1232,1241 ---- if {$@subpatch} {return [$@canvas save]} $self checkgeometry ! #if {$@name != ""} { ! # pd .$self savetofile $@name $@folder ! #} else { ! # $self save_as ! #} ! if {![regexp {^Untitled-[0-9]} $@name]} { pd .$self savetofile $@name $@folder } else {