Tools__ObjectModuleInformation.st
changeset 3345 681833029ed5
parent 3294 29f61473d4a5
child 3388 b9b7b2fae2f9
--- a/Tools__ObjectModuleInformation.st	Fri Oct 14 18:52:36 2016 +0200
+++ b/Tools__ObjectModuleInformation.st	Mon Oct 31 14:21:58 2016 +0100
@@ -559,7 +559,7 @@
      the DataSetBuilder may not be able to read the specification."
 
     "
-     DataSetBuilder new openOnClass:ObjectModuleInformation andSelector:#tableColumns
+     DataSetBuilder new openOnClass:Tools::ObjectModuleInformation andSelector:#tableColumns
     "
 
     <resource: #tableColumns>
@@ -568,23 +568,34 @@
       (DataSetColumnSpec
          label: 'Name'
          activeHelpKey: ''
+         activeHelpKeyForLabel: ''
          labelButtonType: Button
+         isSortable: true
+         sortSelector: name
          width: 0.5
+         height: heightOfFirstRow
          model: name
+         menuFromApplication: false
          canSelect: false
        )
       (DataSetColumnSpec
          label: 'Version'
          activeHelpKey: ''
          labelButtonType: Button
+         height: heightOfFirstRow
          model: version
          canSelect: false
        )
       (DataSetColumnSpec
          label: 'Date'
          activeHelpKey: ''
+         activeHelpKeyForLabel: ''
          labelButtonType: Button
+         isSortable: true
+         sortSelector: dateOrEmpty
+         height: heightOfFirstRow
          model: date
+         menuFromApplication: false
          canSelect: false
        )
       )
@@ -1555,6 +1566,10 @@
     date := something.
 !
 
+dateOrEmpty
+    ^ date ? ''
+!
+
 name
     ^ name
 !