fix study list

nfdi4plants · Mar 31, 2023 · c7a84e9 · c7a84e9
1 parent 810f791
commit c7a84e9
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/src/ArcCommander/APIs/StudyAPI.fs b/src/ArcCommander/APIs/StudyAPI.fs
@@ -351,9 +351,12 @@ module StudyAPI =
 
         log.Info("Start Study List")
 
-        let ardDir = GeneralConfiguration.getWorkDirectory arcConfiguration
+        let arcDir = GeneralConfiguration.getWorkDirectory arcConfiguration
 
-        Study.list ardDir  
+        Study.list arcDir  
+        |> Seq.iter (fun identifier ->
+            log.Debug(sprintf "Study: %s" identifier)
+        )
 
     /// Functions for altering investigation contacts.
     module Contacts =