如何在Hoplon中切换标签

Question

如果我有以下代码和一个函数可以从'p'标签切换到'h1'标签：

 (def switch-tag (cell p))

及以后在HLISP

 ((cell= switch-tag) "Text goes here")

当我切换到H1标签时，什么都没有发生。

Answer 1

我一直无法解决您的方式。这是一个解决方法：

(page "index.html")
(def key! (cell true))
(defelem my-elem [_ [child]]
         (cell= (if key! (h1 child) (p child))))
(html
    (body
        (button :click #(swap! key! not) "test")
        (my-elem "this is a test")))