Merge pull request #512 from tesonep/Inspector-sorting-on-collections

Inspector-sorting-on-collections
pharo-spec · May 4, 2023 · f6867d1 · f6867d1
2 parents fa5ce86 + 18d8916
commit f6867d1
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/src/NewTools-Inspector-Extensions/Bag.extension.st b/src/NewTools-Inspector-Extensions/Bag.extension.st
@@ -9,10 +9,12 @@ Bag >> inspectionItems: aBuilder [
 			title: 'Items';
 			evaluated: [ :each | StObjectPrinter asTruncatedTextFrom: each key ];
 			beNotExpandable;
+			beSortable;
 			yourself);
 		addColumn: (SpStringTableColumn new  
 			title: 'Occurences'; 
 			evaluated: [ :each | StObjectPrinter asTruncatedTextFrom: (self occurrencesOf: each key) ];
+			beSortable;
 			yourself);
 		items: contents associations;
 		yourself

diff --git a/src/NewTools-Inspector-Extensions/Collection.extension.st b/src/NewTools-Inspector-Extensions/Collection.extension.st
@@ -13,7 +13,7 @@ Collection >> inspectionItems: aBuilder [
 		addColumn: (SpStringTableColumn new  
 			title: 'Value'; 
 			evaluated: [ :each | StObjectPrinter asTruncatedTextFrom: each ];
-			sortFunction: #printString ascending;
+			beSortable;
 			yourself);
 		items: self asOrderedCollection;
 		yourself