# HG changeset patch
# User recetox
# Date 1635957118 0
# Node ID 51f8e69c9d47b5bd5374ee3fa07ed0f16a0d457a
# Parent  29b04e82bc4efe3b6956bf803459ba462accf2bf
"planemo upload for repository https://github.com/RECETOX/galaxytools/tree/master/tools/recetox-xmsannotator commit c3ef30761f7b9641b0cea7464eb945a37ed9cb6f"

diff -r 29b04e82bc4e -r 51f8e69c9d47 october_recetox_xmsannotator_advanced.xml
--- a/october_recetox_xmsannotator_advanced.xml	Wed Nov 03 12:35:35 2021 +0000
+++ b/october_recetox_xmsannotator_advanced.xml	Wed Nov 03 16:31:58 2021 +0000
@@ -1,4 +1,4 @@
-<tool id="october_recetox_xmsannotator_advanced" name="OCTOBER RECETOX xMSannotator advanced" version="@TOOL_VERSION@+galaxy3">
+<tool id="october_recetox_xmsannotator_advanced" name="OCTOBER RECETOX xMSannotator advanced" version="@TOOL_VERSION@+galaxy4">
     <description>annotate peak intensity table including scores and confidence levels</description>
     <macros>
         <import>macros.xml</import>
@@ -13,10 +13,15 @@
         <configfile name="wrapper"><![CDATA[
             library(recetox.xmsannotator)
 
+            peak_table = arrow::read_parquet("${peak_table}")
+            if("peak" %in% colnames(peak_table)) {
+              if(!is.integer(peak_table$peak)) {
+                peak_table$peak <- as.integer(peak_table$peak)
+              }
+            }
+
             annotation <- advanced_annotation(
-            #if $peak_table.is_of_type("parquet")
-                peak_table = load_peak_table_parquet("${peak_table}"),
-            #end if
+                peak_table = peak_table,
                 adduct_table = load_adduct_table_parquet("${adduct_table}"),
                 adduct_weights = as.data.frame(read.csv("${adduct_weights}")),
                 compound_table = load_compound_table_parquet("${compound_table}"),