diff lib.r @ 23:dcff3c4a8c80 draft

planemo upload for repository https://github.com/workflow4metabolomics/xcms commit 5583baab62c0f17cabbfe93ba4f2522e8df9b36b
author lecorguille
date Thu, 30 Mar 2017 08:34:09 -0400
parents a79d839d625f
children 36b470f3ebcf
line wrap: on
line diff
--- a/lib.r	Wed Mar 22 16:05:27 2017 -0400
+++ b/lib.r	Thu Mar 30 08:34:09 2017 -0400
@@ -476,9 +476,7 @@
 
 
 # This function get the raw file path from the arguments
-getRawfilePathFromArguments <- function(listArguments) {
-    zipfile = NULL
-    singlefile = NULL
+getRawfilePathFromArguments <- function(singlefile, zipfile, listArguments) {    
     if (!is.null(listArguments[["zipfile"]]))           zipfile = listArguments[["zipfile"]]
     if (!is.null(listArguments[["zipfilePositive"]]))   zipfile = listArguments[["zipfilePositive"]]
     if (!is.null(listArguments[["zipfileNegative"]]))   zipfile = listArguments[["zipfileNegative"]]