Skip to content

Commit

Permalink
fixes #30
Browse files Browse the repository at this point in the history
  • Loading branch information
JBGruber committed Apr 14, 2024
1 parent 117652a commit 869bc91
Show file tree
Hide file tree
Showing 2 changed files with 4 additions and 0 deletions.
Binary file modified tests/files/LNToutput.RDS
Binary file not shown.
4 changes: 4 additions & 0 deletions tests/testthat/test-lnt_read.R
Original file line number Diff line number Diff line change
Expand Up @@ -9,13 +9,16 @@ test_that("Read in sample file", {
test@meta$Source_File <- basename(test@meta$Source_File)
attributes(test)$created$time <- "2018-12-15 01:00:38 GMT"
attributes(test)$created$Version <- "0.2.1.9000"
# ensures compatibility with different version of tibble
attributes(test@paragraphs)$.internal.selfref <- NULL
test
}, readRDS("../files/LNToutput.RDS"))
expect_equal({
test <- lnt_read(files, verbose = TRUE)
test@meta$Source_File <- basename(test@meta$Source_File)
attributes(test)$created$time <- "2018-12-15 01:00:38 GMT"
attributes(test)$created$Version <- "0.2.1.9000"
attributes(test@paragraphs)$.internal.selfref <- NULL
test <- test[1:10]
test
}, readRDS("../files/LNToutput.RDS"))
Expand All @@ -24,6 +27,7 @@ test_that("Read in sample file", {
test@meta$Source_File <- basename(test@meta$Source_File)
attributes(test)$created$time <- "2018-12-15 01:00:38 GMT"
attributes(test)$created$Version <- "0.2.1.9000"
attributes(test@paragraphs)$.internal.selfref <- NULL
test
}, readRDS("../files/LNToutput2.RDS"))
})
Expand Down

0 comments on commit 869bc91

Please sign in to comment.