--- a/UIPainterView.st	Fri Jan 02 16:57:44 1998 +0100
+++ b/UIPainterView.st	Fri Jan 02 17:03:12 1998 +0100
@@ -210,6 +210,12 @@
 
 !
 
+pasteFromClipBoard:aString
+    ^ self
+
+
+!
+
 pasteSpecifications:aSpecificationOrList keepLayout:keepLayout
     "add the specs to the object view; returns list of pasted components
     "