# HG changeset patch
# User tomnl
# Date 1525339361 14400
# Node ID 0272aa95b20defdbbcbe2674863bef62525c30fc
# Parent  9c4fabc5f7f9e2e7bea7346d32ba50a3d824e3fc
planemo upload for repository https://github.com/computational-metabolomics/dma-tools-galaxy commit d4159f1962ef3fe37dd4f3047e4050afe013c15a-dirty

diff -r 9c4fabc5f7f9 -r 0272aa95b20d cameradims.R
--- a/cameradims.R	Mon Apr 23 05:46:43 2018 -0400
+++ b/cameradims.R	Thu May 03 05:22:41 2018 -0400
@@ -79,6 +79,15 @@
 
 df <- df[df$i>opt$intensity_filter,]
 
+
+if (opt$rule_type=='extended_large'){
+   if(opt$polarity=='pos'){
+	opt$rule_path <-  read.csv(system.file("rules", "CAMERA_rules_PosFinal_PlusLi.csv", package = "cameraDIMS"),  header=TRUE)
+   }else{
+	opt$rule_path <-  read.csv(system.file("rules", "CAMERA_rules_NegFinal_PlusLi.csv", package = "cameraDIMS"),  header=TRUE)
+   }   
+}
+
 cameraOut <- cameraDIMS(data=df,
                         params_iso=paramiso,
                         params_adduct=paramadduct,