diff --git a/R/xts.R b/R/xts.R index 1d3dc586..7f64f327 100644 --- a/R/xts.R +++ b/R/xts.R @@ -138,6 +138,9 @@ function(x=NULL, index, tclass=c("POSIXct","POSIXt"), .indexFORMAT <- eval(dots.names$.indexFORMAT,parent.frame()) else .indexFORMAT <- NULL + + ## restore behaviour from v0.10-2 + tclass <- .indexCLASS xx <- .Call("add_xtsCoreAttributes", x, index, .indexCLASS, tzone, tclass, c('xts','zoo'), .indexFORMAT, PACKAGE='xts') # remove .indexFORMAT and .indexTZ that come through Ops.xts