[R-gregmisc-users] SF.net SVN: r-gregmisc:[1366] trunk/gdata/R/ll.R

[<ar...@us...>]

Revision: 1366
          http://r-gregmisc.svn.sourceforge.net/r-gregmisc/?rev=1366&view=rev
Author:   arnima
Date:     2009-11-16 12:57:47 +0000 (Mon, 16 Nov 2009)

Log Message:
-----------
ll(.GlobalEnv) does not crash anymore

Modified Paths:
--------------
    trunk/gdata/R/ll.R

Modified: trunk/gdata/R/ll.R
===================================================================
--- trunk/gdata/R/ll.R	2009-11-12 15:38:53 UTC (rev 1365)
+++ trunk/gdata/R/ll.R	2009-11-16 12:57:47 UTC (rev 1366)
@@ -51,7 +51,7 @@
   {
     object.frame <- data.frame()
   }
-  else if(search()[pos] == "Autoloads")  # pos is the autoload environment
+  else if(environmentName(as.environment(pos)) == "Autoloads")
   {
     object.frame <- data.frame(rep("function",length(ls(pos,...))),
                       rep(0,length(ls(pos,...))), row.names=ls(pos,...))


This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.