Returning the last date of xts object with end()

Question

I am using blotter and related packages to create a small portfolio. These packages rely on data from yahoo. Additionally, they are using xts internally, but somehow the functions on a xts object don't work and return the desired results. This of course would need a lot of changing the internal features just to replace end() with a working call like max(index()).

library(quantmod)
library(xts)
getSymbols("LGQM.DE", from="2017-01-01", to=Sys.Date(), src='yahoo',
          auto.assign = TRUE, adjust = TRUE)

str(LGQM.DE)
end(LGQM.DE)

max(index(LGQM.DE))

As can be seen, when executing this code the end() function only returns an empty date value, although the date is stored properly, as can be seen when checking the result of max(index(LGQM.DE)). The packages were installed from github using the devtools and I restarted the R session after the installation.