From 4ab614b5a7d39093750083176166623cf8bf2b11 Mon Sep 17 00:00:00 2001 From: Esteban Lorenzano Date: Thu, 24 Aug 2017 14:57:44 +0100 Subject: [PATCH] elements can be nil if GC happens --- .../IceAbstractModel.class/class/modelFor..st | 2 +- Iceberg-UI.package/monticello.meta/categories.st | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/Iceberg-UI.package/IceAbstractModel.class/class/modelFor..st b/Iceberg-UI.package/IceAbstractModel.class/class/modelFor..st index 56a20149ef..2bfa566d64 100644 --- 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 index 1fa79f84f9..43f6c201ae 100644 --- 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'!