Do not test no longer exported removeWithinSpan
Change-Id: Ia71b5fa53f9bcbdd6e55845bbb0ac255dfe664eb
diff --git a/tests/testthat/test-collocations.R b/tests/testthat/test-collocations.R
index d0dd761..60052a6 100644
--- a/tests/testthat/test-collocations.R
+++ b/tests/testthat/test-collocations.R
@@ -40,11 +40,11 @@
testthat::expect_equal(nrow(df), 0)
})
-test_that("removeWithinSpanWorks", {
- expect_equal(
- removeWithinSpan("contains(<base/s=s>, (machen []{0,1} aufmerksam | aufmerksam []{0,1} machen))", "base/s=s"),
- "(machen []{0,1} aufmerksam | aufmerksam []{0,1} machen)")
-})
+#test_that("removeWithinSpanWorks", {
+# expect_equal(
+# removeWithinSpan("contains(<base/s=s>, (machen []{0,1} aufmerksam | aufmerksam []{0,1} machen))", "base/s=s"),
+# "(machen []{0,1} aufmerksam | aufmerksam []{0,1} machen)")
+#})
test_that("mergeDuplicateCollocatesWorksAsExpected", {