问题描述
我目前正在 Haskell 中使用 GHCJS.DOM/JSDOM,目的是创建一个小型 Web 应用程序。 为了捕获“单击按钮”事件,我编写了以下代码:
releaseAction <- on element click $ do
w <- currentwindowUnchecked
alert w "I was clicked!"
releaseAction
(这是取自页面 https://hackage.haskell.org/package/jsaddle-dom-0.9.4.1/docs/JSDOM-EventM.html 的示例); 问题如下: 如果我删除最后一行(所以我删除了 releaseAction),那么我可以根据需要多次单击“元素”,从而根据需要多次触发事件。 另一方面,如果我不删除最后一行,这会取消该事件,从而阻止我触发单个事件。 我的目标是让用户只点击一次“元素”,然后这个事件必须是 禁止。 我怎样才能胜任这份工作? 谢谢。
解决方法
您可以使用mfix
:
mfix $ \releaseAction -> on element click $ do
w <- currentWindowUnchecked
alert w "I was clicked!"
releaseAction