groupedBy: is not defined in GLASS

SeasideSt · Jul 17, 2023 · 5bc8bc5 · 5bc8bc5
1 parent f81476e
commit 5bc8bc5
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/repository/Seaside-GemStone-Development.package/WAObjectsReadItem.class/instance/report.st b/repository/Seaside-GemStone-Development.package/WAObjectsReadItem.class/instance/report.st
@@ -3,7 +3,7 @@ report
 
 	| objects |
 
-	objects := (objectsRead groupedBy:[:e | e class ]) associations sorted:[:a :b | a value size >  b value size ].
+	objects := (objectsRead groupBy:[:e | e class ] having:[:e | true ]) associations sorted:[:a :b | a value size >  b value size ].
 	^ String streamContents:[:str |
 		objects do:[:assoc |
 			str