Mulitple FI Sources

I am using R and RStudio versions 2.13.1 and 0.94.106 respectively.
I am using Financial Instrument and everything is working for a single data
source.  I have my Rprofile file setup to load packages, define my
instruments, and set my symbol lookup souce.

# packages to load at startup
library(quantmod)
library(fTrading)

# currencies defined

currency("USD")
currency("GBP")

# now exchange rates

# British Pound Rates
exchange_rate("GBPUSD","GBP","USD")

# Set symbol lookups
setSymbolLookup.FI("HistFX", storage_method="rda")

Once I start R or RStudio everything loads and I can run the following and
everything works:
getSymbols.FI("GBPUSD")

This all works for a single data source but I have multiple data sources or
data sets that I would like to access and would like to put everything in
my RProfile but I have yet to figure out how to make it work.

For example, I have a series of historical data files that I got from a
vendor who is not my broker.  So I want to keep my historical data files
separate in one directory 'HistFX' and any data I get from my broker in a
separate folder called 'Broker' for example.

So the directories might look like:

C:\Documents\HistFX\GBPUSD
C:\Documents\Broker\GBPUSD

I tried adding multiple lines to my RProfile with for each source but it
looks like the last line read in is the 'live' one.  I even tried adding
'src=' to try and distinguish one from the other
setSymbolLookup.FI("HistFX", storage_method="rda")
setSymbolLookup.FI("Broker", storage_method="rda")

setSymbolLookup.FI("HistFX", storage_method="rda", src="hist")
setSymbolLookup.FI("Broker", storage_method="rda", src='broker")

I realize the simplest solution would be to just add a setSymbolLookup.FI
command to any script I use pointing to the data I want to use - i.e.
historical or broker - but like I said I was trying to do this in the
RProfile.

Any help would be appreciated.

	[[alternative HTML version deleted]]

Here is my 2 cents on a way to access the same symbols from multiple sources
and time frames. Instead of using the setSymbolLookup.FI() and
getSymbols.FI() functions, why not creating custom functions based on the
getSymbols() structure to access those data: getSymbols.src1(),
getSymbols.src2(), getSymbols.src3()... 

Basically, data are stored in different folders, with different format and
all the formating job is done inside each function. It eventually looks like
something like that: 

## Define instruments (or load instruments)
currency("USD")
future("GC", "USD", multiplier = 10, tick_size = 0.1)
future_series("GC_G00")
## get Gold Feb 2000 contract daily data from src1
getSymbols.src1("GC_G00")  
## get Gold Feb 2000 contract daily data from high frequency data from src2
getSymbols.src2("GC_G00", start_time = "09:30", end_time = "15:59", period =
"days", k = 1)