Fix comment.

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

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)