--- a/XWorkstation.st	Tue Sep 21 23:03:59 2004 +0200
+++ b/XWorkstation.st	Thu Sep 23 17:57:30 2004 +0200
@@ -10007,7 +10007,9 @@
 
     selectionOwnerWindowId := self getSelectionOwnerOf:clipboardAtom.
     selectionOwnerWindowId isNil ifTrue:[
-        ^ nil       "no selection"
+        "no selection. There is the possibilty that one of our (modal)
+         views has been closed. Get the selection from the copyBuffer"
+        ^ copyBuffer.
     ].
     selectionOwnerWindowId = selectionOwner ifTrue:[
         "I still hold the selection, so return my locally buffered data"
@@ -10047,7 +10049,9 @@
 
     selectionOwnerWindowId := self getSelectionOwnerOf:selectionId.
     selectionOwnerWindowId isNil ifTrue:[
-        ^ nil       "no selection"
+        "no selection. There is the possibilty that one of our (modal)
+         views has been closed. Get the selection from the copyBuffer"
+        ^ self copyBufferAsString.
     ].
 
     selectionOwnerWindowId = selectionOwner ifTrue:[
@@ -11765,7 +11769,7 @@
 !XWorkstation class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.467 2004-09-21 19:36:22 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/XWorkstation.st,v 1.468 2004-09-23 15:57:30 stefan Exp $'
 ! !
 
 XWorkstation initialize!