pd/src desire.tk,1.1.2.342,1.1.2.343 - Pd-cvs

15 Aug 2006


      Update of /cvsroot/pure-data/pd/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv24242
Modified Files:
      Tag: devel_0_39
    desire.tk 
Log Message:
fixed moving of multiple selection.
Index: desire.tk
===================================================================
RCS file: /cvsroot/pure-data/pd/src/Attic/desire.tk,v
retrieving revision 1.1.2.342
retrieving revision 1.1.2.343
diff -C2 -d -r1.1.2.342 -r1.1.2.343
*** desire.tk	15 Aug 2006 16:34:49 -0000	1.1.2.342
--- desire.tk	15 Aug 2006 16:49:57 -0000	1.1.2.343
***************
*** 2340,2344 ****
        }
        move {
! 	foreach obj $@selection {pd .$self object_moveto !$obj $x $y}
    set objs $@selection
    $@history add [list $self undomove $objs]
--- 2340,2344 ----
        }
        move {
! 	foreach obj $@selection {pd .$self object_moveto !$obj [$obj xy]}
    set objs $@selection
    $@history add [list $self undomove $objs]