tests/testthat/test_link_to_sp_books.R
In yorkulibraries/yulr: Small R Helper Functions for York University Libraries
context("Check Scholars Portal Books links")
test_that("VuFind link is correct", {
expect_equal(link_to_sp_books("557306", "Marcus Aurelius: A Biography"), '<a href="https://books.scholarsportal.info/viewdoc.html?id=557306">Marcus Aurelius: A Biography</a>')
expect_equal(link_to_sp_books("/ebooks/ebooks3/upress/2013-05-05/1/9780773590915", "Ideological perspectives on Canada"), '<a href="https://books.scholarsportal.info/viewdoc.html?id=/ebooks/ebooks3/upress/2013-05-05/1/9780773590915">Ideological perspectives on Canada</a>')
})
yorkulibraries/yulr documentation built on May 4, 2019, 5:32 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
context("Check Scholars Portal Books links")
test_that("VuFind link is correct", {
expect_equal(link_to_sp_books("557306", "Marcus Aurelius: A Biography"), '<a href="https://books.scholarsportal.info/viewdoc.html?id=557306">Marcus Aurelius: A Biography</a>')
expect_equal(link_to_sp_books("/ebooks/ebooks3/upress/2013-05-05/1/9780773590915", "Ideological perspectives on Canada"), '<a href="https://books.scholarsportal.info/viewdoc.html?id=/ebooks/ebooks3/upress/2013-05-05/1/9780773590915">Ideological perspectives on Canada</a>')
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.