DisplaySurface.st
changeset 3795 3d4786a8351c
parent 3793 2d61fc774fd2
child 3796 418401a5708c
--- a/DisplaySurface.st	Tue Feb 11 16:00:24 2003 +0100
+++ b/DisplaySurface.st	Tue Feb 11 16:03:22 2003 +0100
@@ -2191,14 +2191,15 @@
 
 getTextSelection:selectionBufferSymbol
     "return the text selection - either the local one, or one of the displays
-     clipBoard buffers determined by selectionBufferSymbol."
+     clipBoard buffers determined by selectionBufferSymbol.
+
+     Return aString or nil if there is no selection"
 
     |sel|
 
     sel := device getCopyBuffer.
     sel isNil ifTrue:[
         sel := device getTextSelection:selectionBufferSymbol for:drawableId.
-        sel isNil ifTrue:[^ nil].
     ].
     ^ sel
 
@@ -2325,7 +2326,7 @@
 !DisplaySurface class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.96 2003-02-11 14:00:17 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/DisplaySurface.st,v 1.97 2003-02-11 15:03:22 stefan Exp $'
 ! !
 
 DisplaySurface initialize!