[Quantmod-commits] r608 - pkg/R

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

Author: bodanker
Date: 2013-07-20 15:46:55 +0200 (Sat, 20 Jul 2013)
New Revision: 608

Modified:
   pkg/R/getSplits.R
Log:
- patch bug #4768; thanks to Jim Green


Modified: pkg/R/getSplits.R
===================================================================
--- pkg/R/getSplits.R	2013-07-17 11:43:30 UTC (rev 607)
+++ pkg/R/getSplits.R	2013-07-20 13:46:55 UTC (rev 608)
@@ -28,7 +28,7 @@
             sep = ""), destfile = tmp, quiet = !verbose)
   fr <- read.table(tmp, skip=1, fill=TRUE, as.is=TRUE, sep=",")
   unlink(tmp)
-  fr <- fr[fr$V1=="SPLIT",c("V2","V3")]
+  fr <- fr[fr$V1=="SPLIT",]
 
   if(NROW(fr)==0) {
     fr <- NA