Commit 14262083 authored by mmassaviol's avatar mmassaviol
Browse files

Update force rerun rule (by_step version)

parent 44970030
......@@ -570,10 +570,11 @@ generate_pages_server <- function() {
res <- res + '\t\tparams = yaml.load_file(paste0(input$results_dir,"/params.yml"), handlers=list("float#fix"=function(x){ format(x,scientific=F)}))\n'
res <- res + '\t\toutputs = params[["outputs"]]\n'
res <- res + '\t\ttool = params[["params"]][[force_from]]\n'
res <- res + '\t\tif (length(outputs[[tool]])==1)\n'
res <- res + '\t\t\trule = names(outputs[[tool]])[[1]]\n'
res <- res + '\t\tsteptool = paste0(force_from,"__",tool)\n'
res <- res + '\t\tif (length(outputs[[steptool]])==1)\n'
res <- res + '\t\t\trule = names(outputs[[steptool]])[[1]]\n'
res <- res + '\t\telse{\n'
res <- res + '\t\t\trule = names(outputs[[tool]])[[grep(input$SeOrPe,names(outputs[[tool]]))]]\n'
res <- res + '\t\t\trule = names(outputs[[steptool]])[[grep(input$SeOrPe,names(outputs[[steptool]]))]]\n'
res <- res + '\t\t}\n'
res <- res + '\t\treturn(paste0("--forcerun ",rule))\n'
res <- res + '\t}\n'
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment