diff --git a/R/shiny-ui-config.R b/R/shiny-ui-config.R
index a379fdbc51babb59f2f71cfc4a4203873e0bdd3b..6bea0819fd869c2153428b04f523b58934556978 100644
--- a/R/shiny-ui-config.R
+++ b/R/shiny-ui-config.R
@@ -123,13 +123,7 @@ mk_ui_config <- function() {
 react_conf_f <- function(input,output,session,rv,rf) {
     ## Reactive functions.
 
-    rf$gen_cmpd_inputs <- react_f({
-        rv$m$conf$compounds$known
-        rv$m$conf$compounds$unknown
-        rv$m$conf$compounds$sets
-        verify_compounds(rv$m$conf)
-        load_compound_input(rv$m)
-    })
+
 
     rf$get_tags_from_txt <- react_f({
         ## Tags in the text box.
@@ -147,7 +141,10 @@ react_conf_f <- function(input,output,session,rv,rf) {
         dtable(rf$ctrl2mzml_df())
     })
 
-    rf$get_all_sets <- react_e(rv$m$input$tab$setid,unique(rv$m$input$tab$setid$set))
+    rf$get_all_sets <- react_f({
+        m <- rf$m_input_cmpds()
+        unique(m$input$tab$setid$set)})
+
     rf$m_conf <- react_f({
         m <- list()
         m$conf$project <- rv$project_path