From 04efc55fd2f46e7f5d9dbc47a52c0bb549b90f25 Mon Sep 17 00:00:00 2001
From: Costa <47926492N@ICO.SCS.local>
Date: Wed, 23 Feb 2022 16:24:17 +0100
Subject: [PATCH] Eliminar BDpath. No funciona.

---
 R/BDpath.R  | 3 ---
 R/sqlFile.R | 5 ++++-
 2 files changed, 4 insertions(+), 4 deletions(-)
 delete mode 100644 R/BDpath.R

diff --git a/R/BDpath.R b/R/BDpath.R
deleted file mode 100644
index 514bffb..0000000
--- a/R/BDpath.R
+++ /dev/null
@@ -1,3 +0,0 @@
-sqlFiles<-list()
-sqlFiles[[1]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/OVARIO.accdb"
-sqlFiles[[2]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/MELANOMA UVEAL CIT.accdb"
diff --git a/R/sqlFile.R b/R/sqlFile.R
index ec1b19b..7016c46 100644
--- a/R/sqlFile.R
+++ b/R/sqlFile.R
@@ -1,5 +1,8 @@
 sqlFile<-function(file=1, list=F){
-  source(paste0(.libPaths(),"/BDCIT/R/BDpath.R"), encoding = "UTF-8")
+  # source(paste0(.libPaths(),"/BDCIT/R/BDpath.R"), encoding = "UTF-8")
+  sqlFiles<-list()
+  sqlFiles[[1]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/OVARIO.accdb"
+  sqlFiles[[2]]<-"C:/Users/47926492N/OneDrive - IDIBELL - Institut d'Investigació Biomèdica de Bellvitge/RATG-PIULATS/MELANOMA UVEAL CIT.accdb"
   if (list){
     print(sqlFiles)
   }else{