Fix [Enh]: Improved Image Widget
Add Origin Template Column
Simplify Timestamp Printing
MODIFY
src/PharoLauncher-Spec.package/PhLSearchableTitledTreeModel.class/instance/initializeWidgets.st
src/PharoLauncher-Spec.package/PhLSearchableTitledTreeModel.class/instance/initializeWidgets.st
initialization
initializeWidgets
- | detailsColumn imageColumn |
+ | detailsColumn imageColumn timestampColumn |
super initializeWidgets.
- (detailsColumn := TreeColumnModel new)
+ (timestampColumn := TreeColumnModel new)
headerLabel: 'Last Modified';
headerAction: [ self sortContentByDateModfied ];
- displayBlock: [ :item | item content file modificationTime ].
+ displayBlock: [ :item |
+ | timestamp |
+ timestamp := item content file modificationTime.
+ timestamp asDate yyyymmdd, ' ', timestamp asTime print24 ];
+ initialWidth: 250.
+
+ (detailsColumn := TreeColumnModel new)
+ headerLabel: 'Template';
+ headerAction: [ self sortContentByTemplate ];
+ displayBlock: [ :item | item content originTemplateName ].
imageColumn := tree columns first.
imageColumn
@@ -15,4 +24,4 @@ initializeWidgets
headerAction: [ self sortContentByName ];
initialWidth: 350.
- tree columns: (tree columns copyWith: detailsColumn).
\ No newline at end of file
+ tree columns: (tree columns, { timestampColumn. detailsColumn }).
\ No newline at end of file

ADD
src/PharoLauncher-Spec.package/PhLSearchableTitledTreeModel.class/instance/sortContentByTemplate.st
+private - filtering
+sortContentByTemplate
+
+ self sortTreeWith: [:item1 :item2 | item1 originTemplateName > item2 originTemplateName ]
+
\ No newline at end of file

Fix #130 [Enh]: Improved Image Widget

- Add Origin Template Column
- Simplify Timestamp Printing