#REFACTORING by cg
class: HierarchicalListView
removed:
#collapsedIcon_old
#emptyIcon_old
#expandedIcon_old
changed:
#collapsedIcon (send #collapsedIconInTree instead of #fileTypeDirectoryIcon)
#emptyIcon (send #emptyIconInTree instead of #fileTypeFileIcon)
#expandedIcon (send #expandedIconInTree instead of #fileTypeDirectoryOpenIcon)
--- a/HierarchicalListView.st Mon Dec 12 22:42:36 2016 +0100
+++ b/HierarchicalListView.st Sun Dec 18 11:55:30 2016 +0100
@@ -237,78 +237,15 @@
!
collapsedIcon
- ^ ToolbarIconLibrary fileTypeDirectoryIcon
- "/ ^ self collapsedIcon_old
-!
-
-collapsedIcon_old
- "This resource specification was automatically generated
- by the ImageEditor of ST/X."
-
- "Do not manually edit this!! If it is corrupted,
- the ImageEditor may not be able to read the specification."
-
- "
- self collapsedIcon inspect
- ImageEditor openOnClass:self andSelector:#collapsedIcon
- Icon flushCachedIcons
- "
-
- <resource: #image>
-
- ^Icon
- constantNamed:'HierarchicalListView collapsedIcon'
- ifAbsentPut:[(Depth1Image new) width:16; height:16; bits:(ByteArray fromPackedString:'@@@@@@@@@@@<@@@@_?!!?>G?8_?!!?>G?8@@@@@@@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 0]; mask:((ImageMask new) width:16; height:16; bits:(ByteArray fromPackedString:'@@@@@@@@O@A>@O?<??3??O?<??3??O?<??0@@@@@@@@b') ; yourself); yourself]
+ ^ ToolbarIconLibrary collapsedIconInTree
!
emptyIcon
- ^ ToolbarIconLibrary fileTypeFileIcon.
- "/ ^ self emptyIcon_old
-!
-
-emptyIcon_old
- "This resource specification was automatically generated
- by the ImageEditor of ST/X."
-
- "Do not manually edit this!! If it is corrupted,
- the ImageEditor may not be able to read the specification."
-
- "
- self emptyIcon inspect
- ImageEditor openOnClass:self andSelector:#emptyIcon
- Icon flushCachedIcons
- "
-
- <resource: #image>
-
- ^Icon
- constantNamed:'HierarchicalListView emptyIcon'
- ifAbsentPut:[(Depth1Image new) width:16; height:16; bits:(ByteArray fromPackedString:'@@@@@@@@_4A?XG<@_?A?<G?0_?A?<G?0@@@@@@@@@@@b') ; colorMapFromArray:#[0 0 0 255 255 255]; mask:((ImageMask new) width:16; height:16; bits:(ByteArray fromPackedString:'@@@@@O?@?>C?<O?8??#?>O?8??#?>O?8?? @@@@@@@@b') ; yourself); yourself]
+ ^ ToolbarIconLibrary emptyIconInTree.
!
expandedIcon
- ^ ToolbarIconLibrary fileTypeDirectoryOpenIcon.
- "/ ^ self expandedIcon_old.
-!
-
-expandedIcon_old
- "This resource specification was automatically generated
- by the ImageEditor of ST/X."
-
- "Do not manually edit this!! If it is corrupted,
- the ImageEditor may not be able to read the specification."
-
- "
- self expandedIcon inspect
- ImageEditor openOnClass:self andSelector:#expandedIcon
- Icon flushCachedIcons
- "
-
- <resource: #image>
-
- ^Icon
- constantNamed:#'HierarchicalListView class expandedIcon'
- ifAbsentPut:[(Depth2Image new) width: 16; height: 16; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@@@@@@@@@@@@@@@UP@@@UU@@@EUUUPA@@@@@R*** B***(@***(@****@@@@@@@@@@@@@@@@@@@@@@@@a') ; colorMapFromArray:#[0 0 0 179 179 179 255 255 0]; mask:((ImageMask new) width: 16; height: 16; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@O@A>@O?<??3???????;??/?<??0@@@@@@@@b') ; yourself); yourself]
+ ^ ToolbarIconLibrary expandedIconInTree.
!
openIndicator