Skip to content
Snippets Groups Projects
Commit 3b5f3eba authored by Jean-Karim Heriche's avatar Jean-Karim Heriche
Browse files

Fix bug.

parent 4d4fc86b
No related branches found
No related tags found
No related merge requests found
......@@ -172,7 +172,7 @@ DatafileHandle <- R6Class(
if(length(datafile$parents)>0) {
rslt <- self$store(datafile$parents)
for(parent in datafile$parents) {
if(length(datafile$analysis) == 1) {
if(length(datafile$analysis) > 0 && 'Analysis' %in% class(datafile$analysis)) {
st <- "INSERT IGNORE INTO Analysis_has_Data (Child_ID, Parent_ID, Analysis_ID)
VALUES (?, ?, ?)"
r <- self$dbConnection$execute(st, list(datafile$ID,
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment