--- a/AbstractLauncherApplication.st	Tue Sep 21 22:10:32 2004 +0200
+++ b/AbstractLauncherApplication.st	Tue Sep 21 22:11:52 2004 +0200
@@ -5201,7 +5201,7 @@
                 resources:resources.
     menu 
         actionAt:#copyList 
-        put:[ listView2 setTextSelection:((listView2 list collect:[:l | l string]) asStringCollection asString)  ].
+        put:[ listView2 setClipboardText:((listView2 list collect:[:l | l string]) asStringCollection asString)  ].
     listView2 middleButtonMenu:menu.
 
     unloadButton := Button label:(resources string:'Unload').
@@ -6473,5 +6473,5 @@
 !AbstractLauncherApplication class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.315 2004-09-21 19:37:25 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.316 2004-09-21 20:11:52 stefan Exp $'
 ! !