fix: #listAtCategoryNamed: has been deprecated in Pharo 12

hpi-swa · Sep 23, 2023 · 0f9ddae · 0f9ddae
1 parent d3a45fe
commit 0f9ddae
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/...itory/SmalltalkCI-Pharo-Core.package/SmalltalkCIPharo12.class/class/classesInCategory..st b/...itory/SmalltalkCI-Pharo-Core.package/SmalltalkCIPharo12.class/class/classesInCategory..st
@@ -0,0 +1,6 @@
+class organization
+classesInCategory: aCategory
+	^ (Smalltalk organization tagForCategory: aCategory)
+		ifNotNil: [ :tag |
+			tag classNames collect: [ :className | Smalltalk at: className ] ]
+		ifNil: [ #() ]