--- a/XWorkstation.st	Mon Sep 20 11:41:23 2004 +0200
+++ b/XWorkstation.st	Tue Sep 21 12:23:36 2004 +0200
@@ -10133,7 +10133,7 @@
     ^ nil.
 !
 
-setSelection:anObject owner:aWindowId
+setClipboardObject:anObject owner:aWindowId
     "set the object selection, and make aWindowId be the owner.
      This can be used by other Smalltalk(X) applications only.
      We set only the CLIPBOARD selection"
@@ -10142,7 +10142,7 @@
     self setSelectionOwner:aWindowId of:clipboardAtom time:selectionTime
 !
 
-setTextSelection:aString owner:aWindowId
+setClipboardText:aString owner:aWindowId
     "set the text selection, and make aWindowId be the owner.
      This can be used by any other X application.
 
@@ -11769,7 +11769,7 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.464 2004-09-17 22:20:33 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.465 2004-09-21 10:23:36 ca Exp $'
 ! !
 
 XWorkstation initialize!