diff --git a/R/api.R b/R/api.R index 3053280697df83bc8ff94bcc5ce35044242d17ae..000e42c152981c91d36cda96cd43700539be218b 100644 --- a/R/api.R +++ b/R/api.R @@ -47,10 +47,9 @@ gen_base_ftab <- function(m) { ##' @export load_compound_input <- function(m) { - + if (shiny::isTruthy(m$conf$compounds$known)) m$input$tab$known <- file2tab(m$conf$compounds$known) if (shiny::isTruthy(m$conf$compounds$unknown)) m$input$tab$unknown <- file2tab(m$conf$compounds$unknown) - m$input$tab$setid <- read_setid(m$conf$compounds$sets, m$input$tab$known, m$input$tab$unknown)