Fix old test following #1821.

Rdatatable · Aug 26, 2016 · 8441ff7 · 8441ff7
1 parent 3566b05
commit 8441ff7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/inst/tests/tests.Rraw b/inst/tests/tests.Rraw
@@ -3353,7 +3353,7 @@ if ("package:reshape2" %in% search()) {
     ans = ans[ , .(min=min(value), max=max(value)), by=.(Month, variable)]
     ans = melt(ans, id=1:2, variable.name="variable2")
     ans = dcast(ans, Month ~ variable + variable2)
-    setnames(ans, c("Month", paste(names(ans)[-1L], ".", sep="_")))
+    setnames(ans, c("Month", paste(names(ans)[-1L], sep="_")))
     valvars = c("Ozone", "Solar.R", "Wind", "Temp")
     ans2 <- suppressWarnings(dcast(dt, Month ~ ., fun=list(min, max), na.rm=TRUE, value.var=valvars))
     setcolorder(ans, names(ans2))