Fixed loading older projects

OpenPonk · Jul 25, 2024 · a437c76 · a437c76
1 parent 5a9b06b
commit a437c76
Show file tree

Hide file tree

Showing 2 changed files with 18 additions and 18 deletions.
diff --git a/repository/OpenPonk-Core/OPDirectionalRelationshipController.class.st b/repository/OpenPonk-Core/OPDirectionalRelationshipController.class.st
@@ -19,6 +19,8 @@ Class {
 OPDirectionalRelationshipController >> createDiagramElement [
 
 	super createDiagramElement.
+	self ensureSourceIn: diagramController.
+	self ensureTargetIn: diagramController.
 	^ self diagramElement
 		  source: self source ensureDiagramElement;
 		  target: self target ensureDiagramElement;
@@ -52,14 +54,6 @@ OPDirectionalRelationshipController >> edgeBuilder [
 		'Depracated without replacement - use Roassal directly or define own figures'
 ]
 
-{ #category : 'construction' }
-OPDirectionalRelationshipController >> ensureShownDependenciesInDiagram: aDiagramController [
-
-	self ensureSourceIn: aDiagramController.
-	self ensureTargetIn: aDiagramController.
-	super ensureShownDependenciesInDiagram: aDiagramController
-]
-
 { #category : 'accessing' }
 OPDirectionalRelationshipController >> ensureSourceIn: aDiagramController [
 
@@ -122,6 +116,14 @@ OPDirectionalRelationshipController >> renderSimplified [
 	diagramElement := self diagramElementClass renderSimplifiedForController: self.
 ]
 
+{ #category : 'construction' }
+OPDirectionalRelationshipController >> showWithoutDependentInDiagram: aDiagramController [
+
+	self ensureSourceIn: aDiagramController.
+	self ensureTargetIn: aDiagramController.
+	^ super showWithoutDependentInDiagram: aDiagramController
+]
+
 { #category : 'accessing' }
 OPDirectionalRelationshipController >> source [
 

diff --git a/repository/OpenPonk-Core/OPProjectController.class.st b/repository/OpenPonk-Core/OPProjectController.class.st
@@ -24,16 +24,14 @@ Class {
 { #category : 'instance creation' }
 OPProjectController class >> fromDirectory: aFolder [
 
-	^ [ :job | 
-	  | materializer |
-	  job title: 'Reading project from file'.
-	  materializer := aFolder files
-		                  detect: [ :any | 
-		                  any basename = OPExportInfo fileName ]
-		                  ifFound: [ :exportInfoFile | 
-		                  OPSerializer forExportInfoFile: exportInfoFile ]
-		                  ifNone: [ OPProjectDirectoryMaterializer new ].
-	  materializer loadProjectFrom: aFolder asFileReference ] asJob run
+	| materializer |
+	materializer := aFolder files
+		                detect: [ :any |
+		                any basename = OPExportInfo fileName ]
+		                ifFound: [ :exportInfoFile |
+		                OPSerializer forExportInfoFile: exportInfoFile ]
+		                ifNone: [ OPProjectDirectoryMaterializer new ].
+	^ materializer loadProjectFrom: aFolder asFileReference
 ]
 
 { #category : 'opening' }