[Swift-commit] r4071 - SwiftApps/SwiftR/Swift/R

[noreply at svn.ci.uchicago.edu]

Author: tga
Date: 2011-02-08 17:07:24 -0600 (Tue, 08 Feb 2011)
New Revision: 4071

Modified:
   SwiftApps/SwiftR/Swift/R/Export.R
Log:
Fix to export that resulted in save not resolving some variables correctly.


Modified: SwiftApps/SwiftR/Swift/R/Export.R
===================================================================
--- SwiftApps/SwiftR/Swift/R/Export.R	2011-02-08 15:28:07 UTC (rev 4070)
+++ SwiftApps/SwiftR/Swift/R/Export.R	2011-02-08 23:07:24 UTC (rev 4071)
@@ -78,9 +78,9 @@
     
     #TODO: file mode?
     if (is.null(list))
-        save(..., file=file)
+        save(..., file=file, envir=parent.frame())
     else
-        save(..., list=list, file=file)
+        save(..., list=list, file=file, envir=parent.frame())
     session <- getOption(".swift.session")
     if (is.null(session))
         session <- newSession()