diff --git a/repository/OpenPonk-UML-DI/OPUmlClassifierShape.class.st b/repository/OpenPonk-UML-DI/OPUmlClassifierShape.class.st index 39f2cf2..7c5030d 100644 --- a/repository/OpenPonk-UML-DI/OPUmlClassifierShape.class.st +++ b/repository/OpenPonk-UML-DI/OPUmlClassifierShape.class.st @@ -28,7 +28,8 @@ OPUmlClassifierShape >> initialize [ commentIcon display: [ self hasComments ]. commentIcon form: (self iconNamed: #announcement). commentIcon localStyle: OPUmlStyle new. - commentIcon owningElement: self + commentIcon owningElement: self. + commentBlock := #() ] { #category : #'Roassal2 - updating' }