merged in jv's chenges
authorClaus Gittinger <cg@exept.de>
Wed, 05 Feb 2014 19:57:48 +0100
changeset 13830 7e55ee717c56
parent 13829 5b5d3d945e2a
child 13831 eb1a5f748a3d
merged in jv's chenges
Tools_BrowserList.st
--- a/Tools_BrowserList.st	Wed Feb 05 19:57:47 2014 +0100
+++ b/Tools_BrowserList.st	Wed Feb 05 19:57:48 2014 +0100
@@ -1000,7 +1000,7 @@
         |fh icn h|
 
         true "(icn := Icons at:name ifAbsent:nil) isNil" ifTrue: [
-            icn := (SystemBrowser perform:fetchSelector) onDevice:device.
+            icn := (SystemBrowser perform:fetchSelector) onDevice:Display.
             "/ Icons at:name put:icn.
             icn clearMaskedPixels.
         ].
@@ -1890,10 +1890,10 @@
 !BrowserList class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.59 2014-01-16 14:32:36 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.60 2014-02-05 18:57:48 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.59 2014-01-16 14:32:36 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools_BrowserList.st,v 1.60 2014-02-05 18:57:48 cg Exp $'
 ! !