[Blotter-commits] r943 - pkg/FinancialInstrument/inst/parser

[noreply at r-forge.r-project.org]

Author: gsee
Date: 2012-02-23 17:47:23 +0100 (Thu, 23 Feb 2012)
New Revision: 943

Modified:
   pkg/FinancialInstrument/inst/parser/TRTH_BackFill.R
Log:
 save.image *after* .First and .Last have been assigned in it

Modified: pkg/FinancialInstrument/inst/parser/TRTH_BackFill.R
===================================================================
--- pkg/FinancialInstrument/inst/parser/TRTH_BackFill.R	2012-02-23 16:22:09 UTC (rev 942)
+++ pkg/FinancialInstrument/inst/parser/TRTH_BackFill.R	2012-02-23 16:47:23 UTC (rev 943)
@@ -200,8 +200,6 @@
         # we need to set it.  That requries restarting R.
         wd <- getwd()
         setwd(.TRTH$path.output)
-        save.image() # so we can load it back when R restarts
-        #TODO: make copy of .RData if it already exists instead of clobbering.
         assign(".First", function() {
             #Maybe this could just recursively call configureTRTH..
             require(FinancialInstrument)
@@ -216,6 +214,8 @@
             system(paste('TMPDIR=', .TRTH$tmp, 
                          ' R --no-site-file --no-init-file --quiet', sep=""))
         }, pos=.GlobalEnv)
+        save.image() # so we can load it back when R restarts
+        #TODO: make copy of .RData if it already exists instead of clobbering.
         q("no")
     }
     # If the previous if-block executed, the rest of this function will be