From 0d05e00f092eed9a8af78d49a7a9f6612a800721 Mon Sep 17 00:00:00 2001
From: eblondel <emmanuel.blondel1@gmail.com>
Date: Sun, 10 Apr 2022 12:58:35 +0200
Subject: [PATCH] #11 bypass system.file

---
 tests/testthat/test_DCEntry.R | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/tests/testthat/test_DCEntry.R b/tests/testthat/test_DCEntry.R
index 05eecbb..c5a4212 100644
--- a/tests/testthat/test_DCEntry.R
+++ b/tests/testthat/test_DCEntry.R
@@ -51,10 +51,9 @@ test_that("encoding/decoding DCEntry",{
 
 })
 
-dcfile <- system.file("extdata/examples", "zenodo_dc_export.xml", package = "atom4R")
 test_that("decoding Zenodo Dublin core",{
 
-  dcxml <- xmlParse(dcfile)
+  dcxml <- xmlParse(httr::content(httr::GET("https://raw.githubusercontent.com/eblondel/atom4R/master/inst/extdata/examples/zenodo_dc_export.xml")))
   dcentry <- DCEntry$new(xml = dcxml)
   dcentry_xml <- dcentry$encode()