From b5e07cf2095c8ac953b20024701a461e025e19fb Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Jan=20Blizni=C4=8Denko?= Date: Mon, 22 Jul 2024 18:54:38 +0200 Subject: [PATCH] Do not allow generalization self-loops --- .../OPUmlClassController.class.st | 12 +++++++----- 1 file changed, 7 insertions(+), 5 deletions(-) diff --git a/repository/OpenPonk-ClassEditor/OPUmlClassController.class.st b/repository/OpenPonk-ClassEditor/OPUmlClassController.class.st index ce36d23f..459fed7d 100644 --- a/repository/OpenPonk-ClassEditor/OPUmlClassController.class.st +++ b/repository/OpenPonk-ClassEditor/OPUmlClassController.class.st @@ -56,11 +56,13 @@ OPUmlClassController >> canBeSourceFor: aController [ { #category : 'adding' } OPUmlClassController >> canBeTargetFor: aController [ - ^ (aController isKindOf: OPUmlAttributeController) - | (aController isKindOf: OPUmlOperationController) - | (aController isKindOf: OPUmlGeneralizationController) - | (aController isKindOf: OPUmlAssociationController) - | (aController isKindOf: OPUmlExtensionController) + + ^ (aController isKindOf: OPUmlAttributeController) or: [ + (aController isKindOf: OPUmlOperationController) or: [ + (aController isKindOf: OPUmlAssociationController) or: [ + (aController isKindOf: OPUmlExtensionController) or: [ + (aController isKindOf: OPUmlGeneralizationController) and: [ + aController source ~= self ] ] ] ] ] ] { #category : 'figures' }