[Blotter-commits] r1413 - pkg/blotter/R

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

Author: bodanker
Date: 2013-03-26 16:29:13 +0100 (Tue, 26 Mar 2013)
New Revision: 1413

Modified:
   pkg/blotter/R/chart.Posn.R
Log:
- eval match.call output in case 'prefer' is an object


Modified: pkg/blotter/R/chart.Posn.R
===================================================================
--- pkg/blotter/R/chart.Posn.R	2013-03-25 12:26:31 UTC (rev 1412)
+++ pkg/blotter/R/chart.Posn.R	2013-03-26 15:29:13 UTC (rev 1413)
@@ -19,7 +19,7 @@
     require(quantmod)
     Prices=get(Symbol)
     if(!is.OHLC(Prices)) {
-        if(hasArg(prefer)) prefer=match.call(expand.dots=TRUE)$prefer else prefer=NULL
+        if(hasArg(prefer)) prefer=eval(match.call(expand.dots=TRUE)$prefer) else prefer=NULL
         Prices=getPrice(Prices, prefer=prefer)
     }
     freq = periodicity(Prices)