# HG changeset patch
# User tomnl
# Date 1522165591 14400
# Node ID 8a9f643e8023d3c439b327d20b0911366799ceb2
# Parent  ad345c86aca45da9ea47e6bd083d0f006057c94b
planemo upload for repository https://github.com/computational-metabolomics/mspurity-galaxy commit 2e847122cf605951c334858455fc1d3ebdb189e9-dirty

diff -r ad345c86aca4 -r 8a9f643e8023 anticipated_purity_dims.R
--- a/anticipated_purity_dims.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/anticipated_purity_dims.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("--mzML_file"), type="character"),
diff -r ad345c86aca4 -r 8a9f643e8023 anticipated_purity_lcms.R
--- a/anticipated_purity_lcms.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/anticipated_purity_lcms.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("--xset_path"), type="character"),
diff -r ad345c86aca4 -r 8a9f643e8023 assess_purity_msms.R
--- a/assess_purity_msms.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/assess_purity_msms.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,5 +1,6 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
 
 option_list <- list(
   make_option(c("-o", "--out_dir"), type="character"),
diff -r ad345c86aca4 -r 8a9f643e8023 create_sqlite_db.R
--- a/create_sqlite_db.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/create_sqlite_db.R	Tue Mar 27 11:46:31 2018 -0400
@@ -2,6 +2,7 @@
 library(optparse)
 library(xcms)
 library(CAMERA)
+print(sessionInfo())
 print('CREATING DATABASE')
 
 
diff -r ad345c86aca4 -r 8a9f643e8023 frag4feature.R
--- a/frag4feature.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/frag4feature.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,6 +1,7 @@
 library(optparse)
 library(msPurity)
 library(xcms)
+print(sessionInfo())
 
 xset_pa_filename_fix <- function(opt, pa, xset){
 
diff -r ad345c86aca4 -r 8a9f643e8023 spectral_matching.R
--- a/spectral_matching.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/spectral_matching.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,5 +1,7 @@
 library(msPurity)
 library(optparse)
+print(sessionInfo())
+
 
 option_list <- list(
   make_option(c("-o", "--out_dir"), type="character"),
@@ -92,4 +94,4 @@
 print(cmd)
 scan_hits <- DBI::dbGetQuery(con, cmd)
 
-write.table(scan_hits, file.path(opt$out_dir, 'scan_hits.tsv'), row.names=FALSE, sep='\t')
\ No newline at end of file
+write.table(scan_hits, file.path(opt$out_dir, 'scan_hits.tsv'), row.names=FALSE, sep='\t')
diff -r ad345c86aca4 -r 8a9f643e8023 track_rt_raw.R
--- a/track_rt_raw.R	Tue Mar 27 10:40:42 2018 -0400
+++ b/track_rt_raw.R	Tue Mar 27 11:46:31 2018 -0400
@@ -1,5 +1,7 @@
 library(optparse)
 library(xcms)
+print(sessionInfo())
+
 option_list <- list(
   make_option(c("--xset_path"), type="character"),
   make_option(c("-o", "--out_dir"), type="character")