- submit0 (editPage db key) (attr "value" "Edit")
- --address (hlink (URL {unURL = ("wiki?"++key++"+edit")}) (text "Edit this page")
+ table $ tr $ do
+ td $ submitLink0 (editPage db key) (text "Edit this page")
+ td $ text "Keyword: " >> activate (sp db) textInputField empty