Skip to content

Commit

Permalink
Fix test
Browse files Browse the repository at this point in the history
  • Loading branch information
richfitz committed Dec 20, 2023
1 parent eef2ec5 commit e7f8b9c
Showing 1 changed file with 2 additions and 2 deletions.
4 changes: 2 additions & 2 deletions tests/testthat/test-windows.R
Original file line number Diff line number Diff line change
Expand Up @@ -3,7 +3,7 @@ test_that("windows_path calls hipercow.windows", {
mock_ensure_package <- mockery::mock(mock_pkg)
mockery::stub(windows_path, "ensure_package", mock_ensure_package)
p <- getwd()
windows_path("home", p, "//fi--san03/homes/bob", "Q:")
windows_path(p, "//fi--san03/homes/bob", "Q:")

mockery::expect_called(mock_ensure_package, 1)
args <- mockery::mock_args(mock_ensure_package)[[1]]
Expand All @@ -12,7 +12,7 @@ test_that("windows_path calls hipercow.windows", {

mockery::expect_called(mock_pkg$windows_path, 1)
expect_equal(mockery::mock_args(mock_pkg$windows_path)[[1]],
list("home", p, "//fi--san03/homes/bob", "Q:"))
list(p, "//fi--san03/homes/bob", "Q:"))
})


Expand Down

0 comments on commit e7f8b9c

Please sign in to comment.