elements can be nil if GC happens

pharo-vcs · Aug 24, 2017 · 4ab614b · 4ab614b
1 parent a019ac9
commit 4ab614b
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/Iceberg-UI.package/IceAbstractModel.class/class/modelFor..st b/Iceberg-UI.package/IceAbstractModel.class/class/modelFor..st
@@ -4,7 +4,7 @@ modelFor: entity
 	"We are using a WeakSet for keeping models because using a dictionary (sorted by 
 	 name) has problems when cleaning. This should be efficient enough, but we'll see."
 	model := self models 
-		detect: [ :each | each entity name = entity name ] 
+		detect: [ :each | each notNil and: [ each entity name = entity name ] ] 
 		ifNone: [ nil ].
 	^ model ifNil: [ 
 		self compactIfNeeded.

diff --git a/Iceberg-UI.package/monticello.meta/categories.st b/Iceberg-UI.package/monticello.meta/categories.st
@@ -1,4 +1,4 @@
 SystemOrganization addCategory: #'Iceberg-UI'!
-SystemOrganization addCategory: 'Iceberg-UI-Model'!
-SystemOrganization addCategory: 'Iceberg-UI-Utils'!
-SystemOrganization addCategory: 'Iceberg-UI-View'!
+SystemOrganization addCategory: #'Iceberg-UI-Model'!
+SystemOrganization addCategory: #'Iceberg-UI-Utils'!
+SystemOrganization addCategory: #'Iceberg-UI-View'!