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

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

Author: braverock
Date: 2011-02-23 15:08:39 +0100 (Wed, 23 Feb 2011)
New Revision: 560

Modified:
   pkg/FinancialInstrument/R/load.instruments.R
Log:
- add 'src' method for use in choosing getSymbols method in setSymbolLookup
- add dots to params list in setSymbolLookup

Modified: pkg/FinancialInstrument/R/load.instruments.R
===================================================================
--- pkg/FinancialInstrument/R/load.instruments.R	2011-02-23 13:53:11 UTC (rev 559)
+++ pkg/FinancialInstrument/R/load.instruments.R	2011-02-23 14:08:39 UTC (rev 560)
@@ -164,6 +164,10 @@
     params$extension<-extension
     params$split_method<-split_method
     params$src<-src
+    if(length(list(...))>=1){
+        dlist<-list(...)
+        params<-c(params(dlist))
+    }
     new.symbols<-list()
     ndc<-nchar(base_dir)
     if(substr(base_dir,ndc,ndc)=='/') sepch='' else sepch='/'