[Apophysis-cvs-commits] 2.10/Source Editor.pas,1.64,1.65

[Peter S. <zu...@us...>]

Update of /cvsroot/apophysis/2.10/Source
In directory sc8-pr-cvs11.sourceforge.net:/tmp/cvs-serv6666

Modified Files:
	Editor.pas 
Log Message:
fixed deleting xforms with "solo" on

Index: Editor.pas
===================================================================
RCS file: /cvsroot/apophysis/2.10/Source/Editor.pas,v
retrieving revision 1.64
retrieving revision 1.65
diff -C2 -d -r1.64 -r1.65
*** Editor.pas	11 Aug 2008 14:59:33 -0000	1.64
--- Editor.pas	12 Aug 2008 13:21:22 -0000	1.65
***************
*** 1066,1069 ****
--- 1066,1070 ----
      end;
      //
+ 
      if t = (Transforms - 1) then
      begin
***************
*** 1080,1083 ****
--- 1081,1088 ----
        end;
      end;
+ 
+     if cp.soloXform > t then Dec(cp.soloXform)
+     else if cp.soloXform = t then cp.soloXform := -1;
+ 
      Dec(Transforms);
      assert(cp.xform[transforms].density = 0); // cp.xform[transforms].density := 0;