From 93369aa39b4fb0fd51911db8d59b9eb4d8211fd4 Mon Sep 17 00:00:00 2001 From: Cadence Ember Date: Wed, 19 Nov 2025 17:07:40 +1300 Subject: [PATCH] make the captcha red --- src/page-captcha.rkt | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/page-captcha.rkt b/src/page-captcha.rkt index dcbf818..6b410d4 100644 --- a/src/page-captcha.rkt +++ b/src/page-captcha.rkt @@ -53,7 +53,7 @@ (define diameter 35) (define font (make-object font% 12 'system)) (define msg "I'm not a robot!") -(define checkbox (filled-ellipse diameter diameter #:color "Pale Goldenrod")) +(define checkbox (filled-ellipse diameter diameter #:color "Red")) (define assembly (frame (inset @@ -81,6 +81,7 @@ (printf "captcha skip - via ~a [~a] - ~v~n" method (get-ip req) (url->string (request-uri req)))) (next-dispatcher)] [_ (void)])) + (response-handler (define body `(*TOP*