# HG changeset patch
# User recetox
# Date 1685006025 0
# Node ID 66f2158f818b72ff1757f1a039de341a658d5533
# Parent  76d8d4c4ab355abfc6efd78eb294b2c558f74e7f
planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/recetox_aplcms commit 505c3374a3e1e9aa450fcb752f2b8f87558fedbb

diff -r 76d8d4c4ab35 -r 66f2158f818b utils.R
--- a/utils.R	Wed May 24 14:47:45 2023 +0000
+++ b/utils.R	Thu May 25 09:13:45 2023 +0000
@@ -41,9 +41,9 @@
 
 save_parquet_collection <- function(feature_tables, sample_names, subdir) {
     dir.create(subdir)
-    for (i in seq_len(length(feature_tables))) {
-      filename <- file.path(subdir, paste0(subdir, "_", sample_names[i], ".parquet"))
-      feature_table <- as.data.frame(feature_tables[[i]])
+    for (i in seq_len(length(table$feature_tables))) {
+      filename <- file.path(subdir, paste0(sample_names[i], ".parquet"))
+      feature_table <- as.data.frame(table$feature_tables[[i]])
       feature_table <- save_sample_name(feature_table, sample_names[i])
       arrow::write_parquet(feature_table, filename)
     }