test: add tests for new R6

noclocks · Aug 29, 2024 · 04b0a29 · 04b0a29
1 parent 03df184
commit 04b0a29
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/tests/testthat/test-entrata-api.R b/tests/testthat/test-entrata-api.R
@@ -0,0 +1,13 @@
+test_that("EntrataAPI class works as expected", {
+  cfg <- list(
+    username = "testuser",
+    password = "testpass",
+    base_url = "https://api.entrata.com"
+  )
+
+  api <- EntrataAPI$new(config = cfg)
+  expect_s3_class(api, "EntrataAPI")
+  expect_equal(api$config$username, "testuser")
+  expect_equal(api$config$password, "testpass")
+  expect_equal(api$config$base_url, "https://api.entrata.com")
+})