Browse code

fixing a test error

Kasper Daniel Hansen authored on 15/03/2021 23:01:13
Showing 2 changed files

... ...
@@ -1,5 +1,5 @@
1 1
 Package: bsseq
2
-Version: 1.27.1
2
+Version: 1.27.2
3 3
 Encoding: UTF-8
4 4
 Title: Analyze, manage and store bisulfite sequencing data
5 5
 Description: A collection of tools for analyzing and visualizing bisulfite
... ...
@@ -83,7 +83,8 @@ BSseq <- function(M = NULL, Cov = NULL, coef = NULL, se.coef = NULL,
83 83
     }
84 84
     # Process 'trans' and 'parameters'.
85 85
     if (is.null(trans)) {
86
-        trans <- function() NULL
86
+        trans <- function(q) NULL
87
+        environment(trans) <- emptyenv()
87 88
     }
88 89
     if (is.null(parameters)) {
89 90
         parameters <- list()