@@ -1,6 +1,6 @@

 Package: Biobase

 Title: Biobase: Base functions for Bioconductor

-Version: 2.47.2

+Version: 2.47.3

 Author: R. Gentleman, V. Carey, M. Morgan, S. Falcon

 Description: Functions that are needed by many other packages or which

         replace R functions.

@@ -127,8 +127,8 @@ testVarMetadataAssign <- function() {

 }

 testMetadataFactors <- function() {

-    pd  = data.frame(covar="Z")

-    vmd = data.frame(labelDescription=I("Meta 'covar'"))

+    pd  = data.frame(covar="Z", stringsAsFactors = TRUE)

+    vmd = data.frame(labelDescription=I("Meta 'covar'"), stringsAsFactors = TRUE)

     rownames(vmd) = colnames(pd)

     rownames(pd) = "Z"

     a = new("AnnotatedDataFrame", data=pd,  varMetadata=vmd)