[Rd] getNamespaceExports("base") error

[ml-it-r-devel at epigenomics.com]

Hi!

 >getNamespaceExports("base")
Error in ls(NULL, all = TRUE) : using 'as.environment(NULL)' is defunct

getNamespaceExports
function (ns)
{
     ns <- asNamespace(ns)
     if (isBaseNamespace(ns))
         ls(NULL, all = TRUE)
     else ls(getNamespaceInfo(ns, "exports"), all = TRUE)
}
<environment: namespace:base>

One possible way to fix this could be to changed to e.g.

if (isBaseNamespace(ns))
   ls(envir=baseenv(), all = TRUE)

Observed with
R 2.5.0  &  R 2.6.0 devel (2007-05-12 r41546)
(one has to go back to R 2.3.1 to see it working)


Regards,

   Matthias


-- 
Matthias Burger                     Project Manager/ Biostatistician
Epigenomics AG    Kleine Praesidentenstr. 1    10178 Berlin, Germany
phone:+49-30-24345-371                          fax:+49-30-24345-555
http://www.epigenomics.com           matthias.burger at epigenomics.com
--
Epigenomics AG Berlin           Amtsgericht Charlottenburg HRB 75861
Vorstand:   Geert Nygaard (CEO/Vorsitzender),  Dr. Kurt Berlin (CSO)
               Oliver Schacht PhD (CFO),  Christian Piepenbrock (COO)
Aufsichtsrat:   Prof. Dr. Dr. hc. Rolf Krebs (Chairman/Vorsitzender)