如何在反射中將輸入值設置為當天？

Question

我正在使用帶有obelisk reflex-platform 。 這是我獲取當前日期的前端代碼

pb <- getPostBuild
postBuildTime <- performEvent $ pb $> liftIO getCurrentTime
let today = Text.pack . formatTime defaultTimeLocale "%F" <$> postBuildTime

我可以通過放置來確認這是否有效

dynText =<< holdDyn "loading" today

它甚至不會在一瞬間顯示“正在加載”，而是在瀏覽器（谷歌瀏覽器）中顯示“2021-03-26”。

但是，嘗試將today事件放入<input>是行不通的。 這是代碼：

foo <- inputElement $ def & inputElementConfig_setValue .~ today

<input>保持空白。

更奇怪的是：在我的實際代碼中， <input>通過inputElementConfig_initialValue.~ "BAAAR"有一個初始值，它也沒有顯示。 然而，創建的動態文本就像

dynText =<< holdDyn "" foo

確實顯示“BAAAR”一瞬間。

---

為了平息任何偏執，我用一個簡單的按鈕測試了inputElementConfig_setValue ，效果很好。 即我可以通過單擊一個按鈕來設置<input>的值。

所以postBuildTime事件有效並且inputElementConfig_setValue有效，但是兩者的組合使<input>為空。

編輯

最小示例，包括有關如何運行的說明和結果的屏幕截圖：

https://github.com/rubenmoor/reflex-bug-pbtime

Answer 1

https://github.com/reflex-frp/reflex-dom/commit/93f0f4bd00e1dc871d193d7d53d5d7f2dbb518af

看起來這是一個錯誤，已在reflex-dom中修復。