get selection interface changed
authorca
Tue, 21 Sep 2004 12:54:00 +0200
changeset 3044 f8419843f748
parent 3043 06df889187a4
child 3045 9145edfc4116
get selection interface changed
EditTextView.st
ObjectView.st
--- a/EditTextView.st	Tue Sep 21 12:31:54 2004 +0200
+++ b/EditTextView.st	Tue Sep 21 12:54:00 2004 +0200
@@ -4723,7 +4723,7 @@
 
     "/ return either the (xterm-) selection or the clipBoard
     ^ self 
-        getTextSelection:(self sensor ctrlDown 
+        getClipboardText:(self sensor ctrlDown 
                             ifTrue:#selection
                             ifFalse:#clipboard)
 !
@@ -5932,5 +5932,5 @@
 !EditTextView class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.361 2004-09-21 10:31:54 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libwidg/EditTextView.st,v 1.362 2004-09-21 10:54:00 ca Exp $'
 ! !
--- 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 $'
 ! !