diff options
| author | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2023-08-27 19:41:14 -0400 |
|---|---|---|
| committer | Jakob L. Kreuze <zerodaysfordays@sdf.org> | 2023-08-27 19:41:14 -0400 |
| commit | 7b24e7c7c42fa497705b51a67ead4af575224f4e (patch) | |
| tree | 2fd8b8e99d1e85c69df312090eab00ad3ff70499 /haunt | |
| parent | 94af23a294371efa2fb147633ef4c074bfce3174 (diff) | |
[comments] Clearer intent with form labels
Diffstat (limited to 'haunt')
| -rw-r--r-- | haunt/jakob/builder/blog.scm | 6 | ||||
| -rw-r--r-- | haunt/jakob/dynamic/capabilities/comment-form.scm | 4 |
2 files changed, 6 insertions, 4 deletions
diff --git a/haunt/jakob/builder/blog.scm b/haunt/jakob/builder/blog.scm index c37e906..c20eccc 100644 --- a/haunt/jakob/builder/blog.scm +++ b/haunt/jakob/builder/blog.scm @@ -84,11 +84,11 @@ (@ (id "webmention-form") (action "https://webmention.io/jakob.space/webmention") (method "post")) - (label "Alternatively, if you've written about this " + (label "Or, if you've written about this " ,(hyperlink "https://indieweb.org/responses" "elsewhere") - ", you can let me know the URL:") + ", you can send me a Webmention") (input (@ (name "source") (type "url"))) - (input (@ (value "Send Webmention") (type "submit")))) + (input (@ (value "Send") (type "submit")))) ,(script "section-folds.js") ,(script "comment-reaction.js"))))) diff --git a/haunt/jakob/dynamic/capabilities/comment-form.scm b/haunt/jakob/dynamic/capabilities/comment-form.scm index ddb02f4..9e6e81c 100644 --- a/haunt/jakob/dynamic/capabilities/comment-form.scm +++ b/haunt/jakob/dynamic/capabilities/comment-form.scm @@ -66,7 +66,9 @@ "")))) (input (@ (type "text") (id "captcha") (name "captcha") (size 24)))) (button (@ (id "pow-trigger") (hidden #t)) - "Too hard? (Or unable to see the challenge?) Click here.") + "Too hard? (Or unable to see the challenge?)" + (br) + "Click here for an alternative captcha.") (input (@ (autocomplete "off") (type "text") (id "captcha-id") (name "captcha-id") (hidden #t) (value ,captcha-id))) (input (@ (autocomplete "off") (type "text") (id "captcha-alt") (name "captcha-alt") (hidden #t))) (input (@ (autocomplete "off") (type "text") (id "captcha-alt-id") (name "captcha-alt-id") (hidden #t))) |