Skip to content

Commit

Permalink
udpate a test
Browse files Browse the repository at this point in the history
  • Loading branch information
wlandau committed Jan 10, 2025
1 parent 2a3c98f commit 498f00d
Showing 1 changed file with 8 additions and 3 deletions.
11 changes: 8 additions & 3 deletions tests/interactive/test-class_url.R
Original file line number Diff line number Diff line change
Expand Up @@ -450,11 +450,16 @@ tar_test("store_row_path()", {
expect_equal(store_row_path(store, file), "path")
})

tar_test("store_path_from_record()", {
tar_test("store_path_from_name()", {
store <- tar_target(x, "x_value", format = "url")$store
record <- record_init(path = "path", format = "url")
expect_equal(
store_path_from_record(store, record, path_store_default()),
store_path_from_name(
store,
format = store$format,
name = "x",
path = "path",
path_store = path_store_default()
),
"path"
)
})
Expand Down

0 comments on commit 498f00d

Please sign in to comment.