# HG changeset patch
# User proteore
# Date 1541512565 18000
# Node ID 3a66e1e65c0276686b53bb21345c82528374c393
# Parent  267ee3760721fd3203a6b1ebee9d29d2526dc092
planemo upload commit 2fae8e3b0ec5edeecfcc7efd78e7710b36798d44

diff -r 267ee3760721 -r 3a66e1e65c02 GO-enrich.R
--- a/GO-enrich.R	Tue Nov 06 03:56:00 2018 -0500
+++ b/GO-enrich.R	Tue Nov 06 08:56:05 2018 -0500
@@ -3,7 +3,7 @@
 
 # Read file and return file content as data.frame
 read_file <- function(path,header){
-  file <- try(read.table(path,header=header, sep="\t",stringsAsFactors = FALSE, quote=""),silent=TRUE)
+  file <- try(read.csv(path,header=header, sep="\t",stringsAsFactors = FALSE, quote="",check.names = F),silent=TRUE)
   if (inherits(file,"try-error")){
     stop("File not found !")
   }else{