[Blotter-commits] r1587 - pkg/quantstrat/R

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

Author: bodanker
Date: 2014-03-05 00:39:36 +0100 (Wed, 05 Mar 2014)
New Revision: 1587

Modified:
   pkg/quantstrat/R/orders.R
   pkg/quantstrat/R/ruleOrderProc.R
Log:
- fix "0S" -> "OS" typo in addOrder and ruleOrderProc


Modified: pkg/quantstrat/R/orders.R
===================================================================
--- pkg/quantstrat/R/orders.R	2014-03-04 23:12:04 UTC (rev 1586)
+++ pkg/quantstrat/R/orders.R	2014-03-04 23:39:36 UTC (rev 1587)
@@ -370,7 +370,7 @@
             if(is.numeric(time.in.force))
                 time.in.force <- timestamp + time.in.force
 
-            time.in.force <- format(time.in.force, "%Y-%m-%d %H:%M:%0S")
+            time.in.force <- format(time.in.force, "%Y-%m-%d %H:%M:%OS")
             #TODO FIXME this line probably needs to be sensitive to the index of the market data, Date vs POSIXct
   }
     }

Modified: pkg/quantstrat/R/ruleOrderProc.R
===================================================================
--- pkg/quantstrat/R/ruleOrderProc.R	2014-03-04 23:12:04 UTC (rev 1586)
+++ pkg/quantstrat/R/ruleOrderProc.R	2014-03-04 23:39:36 UTC (rev 1587)
@@ -72,7 +72,7 @@
         tif <- as.Date(tif.xts)
     else
     {
-        tif <- strptime(tif.xts, format='%Y-%m-%d %H:%M:%0S')
+        tif <- strptime(tif.xts, format='%Y-%m-%d %H:%M:%OS')
         tif.na <- is.na(tif)
 		tif[tif.na] <- strptime(tif.xts[tif.na], format='%Y-%m-%d %H:%M:%S')
     }