[Blotter-commits] r1183 - pkg/FinancialInstrument/R

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

Author: gsee
Date: 2012-09-15 15:13:47 +0200 (Sat, 15 Sep 2012)
New Revision: 1183

Modified:
   pkg/FinancialInstrument/R/CompareInstrumentFiles.R
Log:
 force evaluation of file arguments so that they can be expressions like as.list(FinancialInstrument:::.instrument, all.names=TRUE)

Modified: pkg/FinancialInstrument/R/CompareInstrumentFiles.R
===================================================================
--- pkg/FinancialInstrument/R/CompareInstrumentFiles.R	2012-09-14 22:45:23 UTC (rev 1182)
+++ pkg/FinancialInstrument/R/CompareInstrumentFiles.R	2012-09-15 13:13:47 UTC (rev 1183)
@@ -40,6 +40,7 @@
 #' }
 #' @export
 CompareInstrumentFiles <- function(file1, file2, ...) {
+    force(file1); force(file2)
     stopifnot(require("FinancialInstrument"))
     #backup current instrument environment
     bak <- as.list(FinancialInstrument:::.instrument, all.names=TRUE)