class: DirectoryContentsBrowser
authorClaus Gittinger <cg@exept.de>
Sat, 24 May 2014 19:34:39 +0200
changeset 14424 64e4e2a24b46
parent 14423 ce279b3422b2
child 14425 47fb1e0c33a9
class: DirectoryContentsBrowser changed: #dropTargetItemChangedTo:in:
DirectoryContentsBrowser.st
--- a/DirectoryContentsBrowser.st	Sat May 24 02:10:56 2014 +0200
+++ b/DirectoryContentsBrowser.st	Sat May 24 19:34:39 2014 +0200
@@ -1740,7 +1740,8 @@
 
     anItem notNil ifTrue:[
         anItem isDirectory ifTrue:[
-            anItem icon:(self class iconForKeyMatching:#directoryOpenGray).
+            anItem icon:(MIMETypeIconLibrary iconForKeyMatching:#directoryOpenGray)
+                        "/ (self class iconForKeyMatching:#directoryOpenGray).
         ].
     ].
     browser shown ifTrue:[
@@ -3459,10 +3460,10 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.262 2014-05-23 09:29:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.263 2014-05-24 17:34:39 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.262 2014-05-23 09:29:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/DirectoryContentsBrowser.st,v 1.263 2014-05-24 17:34:39 cg Exp $'
 ! !