From 7fc2123e2820d7808cc88f5e2bd2a612ae2707b7 Mon Sep 17 00:00:00 2001
From: Davis Vaughan <davis@posit.co>
Date: Tue, 27 Aug 2024 11:36:36 -0400
Subject: [PATCH] Few more tweaks

---
 tests/testthat/test-funs.R | 19 +++----------------
 1 file changed, 3 insertions(+), 16 deletions(-)

diff --git a/tests/testthat/test-funs.R b/tests/testthat/test-funs.R
index 66c6955e28..205d83a05e 100644
--- a/tests/testthat/test-funs.R
+++ b/tests/testthat/test-funs.R
@@ -97,24 +97,11 @@ test_that("ptype argument affects type casting", {
     between(x, 1.5, 3.5),
     c(FALSE, TRUE, TRUE, FALSE, FALSE)
   )
-  expect_snapshot(
-    between(x, 1.5, 3.5, ptype = integer()),
-    error = TRUE
-  )
-})
-
-
-test_that("ptype argument maintains backwards compatibility", {
-  x <- 1:5
-
-  # Should behave the same as before when ptype is NULL
-  expect_identical(
-    between(x, 2, 4),
-    between(x, 2, 4, ptype = NULL)
-  )
+  expect_snapshot(error = TRUE, {
+    between(x, 1.5, 3.5, ptype = integer())
+  })
 })
 
-
 # cum* --------------------------------------------------------------------
 
 test_that("cum(sum,min,max) return expected results for simple cases", {