Update CyGraph viz function

nfdi4plants · Dec 8, 2023 · 3329967 · 3329967
1 parent 30a9afd
commit 3329967
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/ARCExpect/ARCGraph.fs b/src/ARCExpect/ARCGraph.fs
@@ -324,7 +324,7 @@ module ARCGraph =
             toFullCyGraph
                 //(fun (h,n) -> $"{h}, {n}")    // when using hash * accession or hash * name
                 id      // when using only accession or name
-                (fun (d : IParam seq) -> $"{(Seq.head d).Name}: {(Seq.head d).Value |> ParamValue.getValueAsString}")
+                (fun (d : IParam seq) -> $"""{(Seq.head d).Name}: {(Seq.map (fun (lil : IParam) -> lil.Value |> ParamValue.getValueAsString) d) |> String.concat "; "}""")
                 (fun e -> 
                     [
                         CyParam.label <| e.ToString()