[PD-cvs] pd/src desire.tk,1.1.2.536,1.1.2.537

[chunlee]

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 {