[Quantmod-commits] r605 - pkg/R

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

Author: jryan
Date: 2013-05-06 23:35:54 +0200 (Mon, 06 May 2013)
New Revision: 605

Modified:
   pkg/R/OHLC.transformations.R
Log:
o reverting las Low change


Modified: pkg/R/OHLC.transformations.R
===================================================================
--- pkg/R/OHLC.transformations.R	2013-05-06 21:11:08 UTC (rev 604)
+++ pkg/R/OHLC.transformations.R	2013-05-06 21:35:54 UTC (rev 605)
@@ -224,7 +224,7 @@
 function(x)
 {
   if(has.Lo(x))
-    return(x[,grep('\\.Low',colnames(x),ignore.case=TRUE)])
+    return(x[,grep('Low',colnames(x),ignore.case=TRUE)])
   stop('subscript out of bounds: no column name containing "Low"')
 }
 
@@ -235,7 +235,7 @@
   if(!is.null(colAttr))
     return(if(which) colAttr else TRUE)
 
-  loc <- grep('\\.Low',colnames(x),ignore.case=TRUE)
+  loc <- grep('Low',colnames(x),ignore.case=TRUE)
   if(!identical(loc,integer(0))) {
     return(if(which) loc else TRUE)
   } else FALSE