# HG changeset patch
# User mingchen0919
# Date 1506371135 14400
# Node ID 56b68a320c0e83a7d641716b6e0917d8b3737b7c
# Parent  6be61cb4a1d5387df1ef10b0c99b9158e9197263
planemo upload for repository https://github.com/statonlab/docker-GRReport/tree/master/my_tools/rmarkdown_collection_builder commit 80b6b0f11380afd437d61ad308fdd3985d2ca60b-dirty

diff -r 6be61cb4a1d5 -r 56b68a320c0e collection_list_render.R
--- a/collection_list_render.R	Mon Sep 25 16:19:52 2017 -0400
+++ b/collection_list_render.R	Mon Sep 25 16:25:35 2017 -0400
@@ -32,7 +32,7 @@
 spec_list=list()
 spec_list$FILE_LIST = c('file_list', 'l', '1', 'character')
 spec_list$ECHO = c('echo', 'e', '1', 'character')
-spec_list$FORMAT = c('echo', 'f', '1', 'character')
+spec_list$FORMAT = c('format', 'f', '1', 'character')
 ##--------2. output report and outputs --------------
 spec_list$REPORT = c('report', 'r', '1', 'character')
 spec_list$OUTPUT_DIR = c('list_collection_dir', 'd', '1', 'character')
@@ -63,7 +63,7 @@
     gsub('ECHO', opt$echo, x)
   }) %>%
   (function(x) {
-    gsub('FORMAT', opt$echo, x)
+    gsub('FORMAT', opt$format, x)
   }) %>%
   (function(x) {
     gsub('FILE_LIST', opt$file_list, x)