comparison lib.r @ 4:a1b528cba999 draft

planemo upload commit 50069e075172852530c906581eb4497e733127b6
author lecorguille
date Thu, 06 Apr 2017 05:26:35 -0400
parents f24b9c360a60
children 66fe5a2237f3
comparison
equal deleted inserted replaced
3:f24b9c360a60 4:a1b528cba999
322 return (variableMetadata) 322 return (variableMetadata)
323 } 323 }
324 324
325 325
326 # This function get the raw file path from the arguments 326 # This function get the raw file path from the arguments
327 getRawfilePathFromArguments <- function(listArguments) { 327 getRawfilePathFromArguments <- function(singlefile, zipfile, listArguments) {
328 zipfile = NULL
329 singlefile = NULL
330 if (!is.null(listArguments[["zipfile"]])) zipfile = listArguments[["zipfile"]] 328 if (!is.null(listArguments[["zipfile"]])) zipfile = listArguments[["zipfile"]]
331 if (!is.null(listArguments[["zipfilePositive"]])) zipfile = listArguments[["zipfilePositive"]] 329 if (!is.null(listArguments[["zipfilePositive"]])) zipfile = listArguments[["zipfilePositive"]]
332 if (!is.null(listArguments[["zipfileNegative"]])) zipfile = listArguments[["zipfileNegative"]] 330 if (!is.null(listArguments[["zipfileNegative"]])) zipfile = listArguments[["zipfileNegative"]]
333 331
334 if (!is.null(listArguments[["singlefile_galaxyPath"]])) { 332 if (!is.null(listArguments[["singlefile_galaxyPath"]])) {