Mercurial > repos > lecorguille > xcms_export_samplemetadata

diff lib.r @ 7:f39cd33a73a6 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit a5136bfc124956893f4f0c91808d1c0d78c4ea01
author lecorguille
date Mon, 29 Apr 2019 06:32:48 -0400
parents 14316f8f67a2
children c684ccd89267
line wrap: on
line diff
--- a/lib.r	Tue Mar 12 11:07:11 2019 -0400
+++ b/lib.r	Mon Apr 29 06:32:48 2019 -0400
@@ -333,7 +333,7 @@
     files[exists] <- sub("//","/",files[exists])
 
     # WHAT IS ON THE FILESYSTEM
-    filesystem_filepaths <- system(paste0("find \"$PWD/",directory,"\" -not -name '\\.*' -not -path '*conda-env*' -type f -name \"*\""), intern=T)
+    filesystem_filepaths <- system(paste0("find \"",getwd(),"/",directory,"\" -not -name '\\.*' -not -path '*conda-env*' -type f -name \"*\""), intern=T)
     filesystem_filepaths <- filesystem_filepaths[grep(filepattern, filesystem_filepaths, perl=T)]
 
     # COMPARISON