Hover text for plotly r candlestick chart

This is an interesting question.
Here I try to customize the hover text of the candlestick chart using the following code:

p <- df %>%
  plot_ly(x = ~Date, type="candlestick",
          open = ~AAPL.Open, close = ~AAPL.Close,
          high = ~AAPL.High, low = ~AAPL.Low,
          text = paste("Text1:",df$AAPL.Open,"<br>Text2:",df$AAPL.Close),
          hoverinfo='text') %>%
  layout(title = "Basic Candlestick Chart")

With my plotly_4.8.0.9000 I get a candlestick chart but no hover text appears.
Using plotly_json it is possibile to inspect the JSON sent to plotly.js.
The hoverinfo attribute should be set to 'text' but in data -> 0 -> hoverinfo one can see that it contains an array of strings 'text'.

A possibile solution is to manually set hoverinfo to 'text':

pltyobj <- plotly_build(p)
pltyobj$x$data[[1]]$hoverinfo <- "text"
pltyobj