--- a/UIPainter.st	Fri Oct 13 13:03:11 2006 +0200
+++ b/UIPainter.st	Fri Oct 13 13:07:20 2006 +0200
@@ -9,8 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
-
 "{ Package: 'stx:libtool2' }"
 
 ResourceSpecEditor subclass:#UIPainter
@@ -4879,6 +4877,22 @@
     ^ self canvas canDrop:aCollectionOfDropObjects
 !
 
+canDrop:aCollectionOfDropObjects at:aPoint
+    "can drop ? -> delegate to canvas"
+
+    ^ self canvas canDrop:aCollectionOfDropObjects at:aPoint
+
+    "Created: / 13-10-2006 / 12:35:53 / cg"
+!
+
+drop:aCollectionOfDropObjects
+    "drop objects -> delegate to canvas"
+
+    self canvas drop:aCollectionOfDropObjects
+
+    "Created: / 13-10-2006 / 12:35:59 / cg"
+!
+
 drop:aCollectionOfDropObjects at:aPoint
     "drop objects -> delegate to canvas"