Add test [revdep skip]

Displayr · Jul 4, 2022 · ec4a5ab · ec4a5ab
1 parent 1791710
commit ec4a5ab
Show file tree

Hide file tree

Showing 3 changed files with 10 additions and 1 deletion.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,7 +1,7 @@
 Package: flipData
 Type: Package
 Title: Functions for extracting and describing data
-Version: 1.6.1
+Version: 1.6.2
 Author: Displayr <opensource@displayr.com>
 Maintainer: Displayr <opensource@displayr.com>
 Description: Functions for extracting data from formulas and

diff --git a/inst/testdata/cola19.sav b/inst/testdata/cola19.sav
diff --git a/tests/testthat/test-stacking.R b/tests/testthat/test-stacking.R
@@ -693,3 +693,12 @@ test_that("stackedValueAttributes", {
     expect_equal(stackedValueAttributes(1:2, val.attrs),
                  structure(1:3, .Names = c("A", "B", "C")))
 })
+
+
+# cola19.sav was created from cola.sav by appending @ to the end of the variable names of the 1st question
+test_that("DS-3758: special characters at end of variable names", {
+    expect_error(StackData(findInstDirFile("cola19.sav"),
+                           stack.with.common.labels = "Disabled",
+                           specify.by = "Variable",
+                           manual.stacking = c("Q1_F_c@,Q1_E_c1@,Q1_D_c@,Q1_C_c1@,Q1_A_c@,Q1_B_c1@")), NA)
+})