Mercurial Mercurial > hg > stx-libtool / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
class: FileBrowser
authorStefan Vogel <sv@exept.de>
Tue, 18 Feb 2014 15:39:05 +0100
changeset 13955 b509f1d7df80
parent 13954 2f695adffde6
child 13956 70b04e6814ba
class: FileBrowser changed: #iconForKeyMatching: access device via message send
FileBrowser.st file | annotate | diff | comparison | revisions 
--- a/FileBrowser.st	Tue Feb 18 15:30:56 2014 +0100
+++ b/FileBrowser.st	Tue Feb 18 15:39:05 2014 +0100
@@ -6940,7 +6940,7 @@
 
     icn := MIMETypeIconLibrary iconForKey:mimeTypeOrKey.
     icn notNil ifTrue:[
-        icn := icn copy onDevice:device.
+        icn := icn copy onDevice:self graphicsDevice.
         icn clearMaskedPixels.
         icons at:mimeTypeOrKey put:icn.
         ^ icn
@@ -6950,7 +6950,7 @@
     assoc notNil ifTrue:[
         icn := assoc value.
         icn notNil ifTrue:[
-            icn := icn copy onDevice:device.
+            icn := icn copy onDevice:self graphicsDevice.
             icn clearMaskedPixels.
             matchedIcons add:(assoc key -> icn).
             ^ icn
@@ -7511,10 +7511,10 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.656 2014-02-13 18:39:21 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.657 2014-02-18 14:39:05 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.656 2014-02-13 18:39:21 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.657 2014-02-18 14:39:05 stefan Exp $'
 ! !
hg/stx-libtool