fix assay xlsx parser for technologyplatfrom

nfdi4plants · Aug 14, 2023 · 7a158ff · 7a158ff
1 parent c33f2dd
commit 7a158ff
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/ISA/ISA.Spreadsheet/InvestigationFile/Assays.fs b/src/ISA/ISA.Spreadsheet/InvestigationFile/Assays.fs
@@ -30,7 +30,7 @@ module Assays =
             (fileName)
             (Option.fromValueWithDefault OntologyAnnotation.empty measurementType)
             (Option.fromValueWithDefault OntologyAnnotation.empty technologyType) 
-            (Option.fromValueWithDefault "" technologyPlatform)
+            (Option.fromValueWithDefault "" technologyPlatform |> Option.map ArcAssay.decomposeTechnologyPlatform)
             (ResizeArray())             
             [||] 
             (comments)
@@ -77,7 +77,7 @@ module Assays =
             do matrix.Matrix.Add ((technologyTypeLabel,i),                        tt.TermName)
             do matrix.Matrix.Add ((technologyTypeTermAccessionNumberLabel,i),     tt.TermAccessionNumber)
             do matrix.Matrix.Add ((technologyTypeTermSourceREFLabel,i),           tt.TermSourceREF)
-            do matrix.Matrix.Add ((technologyPlatformLabel,i),                    (Option.defaultValue "" a.TechnologyPlatform))
+            do matrix.Matrix.Add ((technologyPlatformLabel,i),                    (Option.defaultValue "" (a.TechnologyPlatform |> Option.map ArcAssay.composeTechnologyPlatform)))
             do matrix.Matrix.Add ((fileNameLabel,i),                              processedFileName)
 
             if Array.isEmpty a.Comments |> not then