--- a/ObjectView.st	Tue Sep 21 12:31:54 2004 +0200
+++ b/ObjectView.st	Tue Sep 21 12:54:00 2004 +0200
@@ -638,7 +638,7 @@
 
     |sel|
 
-    sel := self getSelection.
+    sel := self getClipboardObject.
     ((Screen current platformName ~= 'X11')
      or:[(device getSelectionOwnerOf:#CLIPBOARD) == drawableId])
     ifTrue:[
@@ -3360,5 +3360,5 @@
 !ObjectView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.106 2004-09-21 10:30:28 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/ObjectView.st,v 1.107 2004-09-21 10:53:43 ca Exp $'
 ! !