@@ -1,4 +1,4 @@

-useDynLib(Biobase, copyEnv_sym=copyEnv, sublist_extract)

+useDynLib(Biobase, sublist_extract)

 import(methods)

@@ -102,6 +102,8 @@ copyEnv <- function(oldEnv, newEnv, all.names=FALSE) {

     nms <- ls(oldEnv, all.names = all.names)

     for (nm in nms)

         newEnv[[nm]] <- oldEnv[[nm]]

+

+    newEnv

 }