From 8babff9509342abadf20006875aac569effd8d28 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Todor=20Kondi=C4=87?= <todor.kondic@uni.lu>
Date: Wed, 30 Sep 2020 14:46:27 +0200
Subject: [PATCH] api: ...
---
R/api.R | 8 ++------
1 file changed, 2 insertions(+), 6 deletions(-)
diff --git a/R/api.R b/R/api.R
index 03346c6..704377e 100644
--- a/R/api.R
+++ b/R/api.R
@@ -270,10 +270,7 @@ extr_data <- function(m) {
err_fine_fun=m$extr$tol$fine,
err_rt=m$extr$tol$rt),
lazy = T)
- ## x$ms1$Files <- fn
- ## x$ms1$tag <- tag
- ## x$ms2$Files <- fn
- ## x$ms2$tag <- tag
+
x$Files <- fn
x
@@ -296,8 +293,7 @@ extr_data <- function(m) {
curr_done <- newly_done
}
m$extr$ms <- data.table::rbindlist(lapply(tmp,future::value))
- ## m$extr$ms2 <- data.table::rbindlist(lapply(m$extr$tmp, function (e) e$ms2))
-
+
message('Saving extracted date to ', m$extr$fn)
saveRDS(object = m$extr, file = m$extr$fn)
message('Done saving extracted data.')
--
GitLab