From 3c58f1dab81b03b544924295217273be7d0d0b52 Mon Sep 17 00:00:00 2001 From: Jan Bliznicenko Date: Sat, 25 Nov 2023 16:48:16 +0100 Subject: [PATCH] unused code cleanup --- .../OPUmlPackageImportShape.class.st | 44 ------------------- 1 file changed, 44 deletions(-) diff --git a/repository/OpenPonk-ClassEditor/OPUmlPackageImportShape.class.st b/repository/OpenPonk-ClassEditor/OPUmlPackageImportShape.class.st index 585904f7..85e98341 100644 --- a/repository/OpenPonk-ClassEditor/OPUmlPackageImportShape.class.st +++ b/repository/OpenPonk-ClassEditor/OPUmlPackageImportShape.class.st @@ -11,27 +11,6 @@ Class { #category : #'OpenPonk-ClassEditor-Shapes' } -{ #category : #initialization } -OPUmlPackageImportShape >> createConnection [ - ^ (OPRTStyledConnection new - attachPoint: (OPRTOrthogonalAttachPoint new offset: 30); - color: self style strokeColor; - head: (self headDecorator asHead color: Color yellow); - tail: self tailDecorator asTail; - width: self style strokeWidth; - decorate: [ :deco | deco dashedLine ]; - edgeFrom: source roassalShape to: target roassalShape) - model: self; - yourself -] - -{ #category : #initialization } -OPUmlPackageImportShape >> createRtEdge [ - ^ super createRtEdge - in: [ :edge | edge shape decorate: [ :deco | deco dashdotLine ] ]; - yourself -] - { #category : #hooks } OPUmlPackageImportShape >> headMarker [ @@ -47,26 +26,3 @@ OPUmlPackageImportShape >> initialize [ forModelElement: self modelElement. constraints := OrderedCollection new ] - -{ #category : #accessing } -OPUmlPackageImportShape >> modelElement: anObject [ - super modelElement: anObject. - nameLabel modelElement: anObject. -] - -{ #category : #testing } -OPUmlPackageImportShape >> showIncomplete [ - ^ false -] - -{ #category : #testing } -OPUmlPackageImportShape >> showOverlapping [ - ^ false -] - -{ #category : #'Roassal2 - updating' } -OPUmlPackageImportShape >> update [ - self rtEdge update. - constraints do: #update. - self ownedElements do: #update -]