diff --git a/R/shiny-state.R b/R/shiny-state.R
index 93336497638d0ccb7180634d08e2d8ee44a82fce..f7260f2835695d22760fdcf4c8b1e905365d30b2 100644
--- a/R/shiny-state.R
+++ b/R/shiny-state.R
@@ -403,7 +403,7 @@ input2conf_metfrag <- function(input,conf) {
                           MetFragPreProcessingCandidateFilter = paste(input$mf_pre_processing_candidate_filter,collapse=","),
                           MetFragPostProcessingCandidateFilter = paste(input$mf_post_processing_candidate_filter,collapse=","))
 
-    ## TODO: FIXME: We need to move away from unit weights from some
+    ## TODO: FIXME: We need to move away from unit weights at some
     ## point. This needs some extra widgets (Sigh!). 
     insc = sapply(input$mf_scores_intrinsic,function(x) 1.0)
     names(insc) = input$mf_scores_intrinsic
diff --git a/R/shiny-ui-base.R b/R/shiny-ui-base.R
index 98e2a63ee0d2204c876ed1bd0e672f23cb410034..e564fe733e15499ef44d9af5754ad8d983ff6971 100644
--- a/R/shiny-ui-base.R
+++ b/R/shiny-ui-base.R
@@ -1621,8 +1621,6 @@ mk_shinyscreen_server <- function(projects,init) {
                                         m=rvs$m)
                 
                 kv = rf_get_cindex_kval()
-                ## Some cols that might be needed to be specified
-                ## explicitely. FIXME TODO: Make this more robust.
                 nsumm = mf_narrow_summ(rvs$m$out$tab$summ,kv,
                                        ms2_rt_i=input$mf_entry_rt_min,
                                        ms2_rt_f=input$mf_entry_rt_max)