--- a/UIPainterView.st	Fri Jul 12 09:09:43 2002 +0200
+++ b/UIPainterView.st	Mon Jul 15 14:11:52 2002 +0200
@@ -250,7 +250,7 @@
     "cut the selection into the cut&paste-buffer
      and open a transaction
     "
-    |specs coll index oldSelection newSelection treeModel parent children size nd|
+    |specs coll index oldSelection newSelection treeModel children size nd|
 
     coll := self minSetOfSuperViews:(self selection).