# HG changeset patch
# User lecorguille
# Date 1488460917 18000
# Node ID beda2d981b9dd212bfee58c698d31548bed7e542
# Parent  a79d839d625f85c4d879bb789a1759a33b2554db
planemo upload for repository https://github.com/workflow4metabolomics/xcms commit e1f22c9b6d39de7aabc6bb625f65aa5ba6a91312

diff -r a79d839d625f -r beda2d981b9d xcms.r
--- a/xcms.r	Wed Mar 01 16:56:48 2017 -0500
+++ b/xcms.r	Thu Mar 02 08:21:57 2017 -0500
@@ -161,6 +161,11 @@
 cat("\t\tCOMPUTE\n")
 xset = do.call(thefunction, listArguments)
 
+# check if there are no peaks
+if (nrow(peaks(xset)) == 0) {
+    stop("No peaks were detected. You should review your settings")
+}
+
 
 cat("\n\n")
 
@@ -170,7 +175,6 @@
 
     #transform the files absolute pathways into relative pathways
     xset@filepaths<-sub(paste(getwd(),"/",sep="") ,"", xset@filepaths)
-    print(zipfile)
     if(exists("zipfile") && !is.null(zipfile) && (zipfile!="")) {
 
         #Modify the samples names (erase the path)