From 8b33968011621bfc37c59eaf2798b47993dc8ebf Mon Sep 17 00:00:00 2001
From: Luis Pereira <luispereira.tkd@gmail.com>
Date: Fri, 14 Nov 2025 23:04:15 +0000
Subject: [PATCH] fix: failed register error messages

---
 asteroid.lisp          | 14 ++++++++++----
 template/register.ctml |  8 ++++----
 2 files changed, 14 insertions(+), 8 deletions(-)

diff --git a/asteroid.lisp b/asteroid.lisp
index 2ab0477..5ecf4bf 100644
--- a/asteroid.lisp
+++ b/asteroid.lisp
@@ -719,7 +719,9 @@
         (cond
           ;; Validate passwords match
           ((not (string= password confirm-password))
-           (render-template-with-plist "register"
+           (format t "Failed to register new user '~a': passwords do not match.~%" username)
+           (clip:process-to-string
+            (load-template "register")
             :title "Asteroid Radio - Register"
             :display-error "display: block;"
             :display-success "display: none;"
@@ -728,7 +730,9 @@
           
           ;; Check if username already exists
           ((find-user-by-username username)
-           (render-template-with-plist "register"
+           (format t "Failed to register new user '~a': Username already exists.~%" username)
+           (clip:process-to-string
+            (load-template "register")
             :title "Asteroid Radio - Register"
             :display-error "display: block;"
             :display-success "display: none;"
@@ -746,14 +750,16 @@
                        (setf (session:field "user-id") (if (listp user-id) (first user-id) user-id)))))
                  ;; Redirect new users to their profile page
                  (radiance:redirect "/asteroid/profile"))
-               (render-template-with-plist "register"
+               (clip:process-to-string
+                (load-template "register")
                 :title "Asteroid Radio - Register"
                 :display-error "display: block;"
                 :display-success "display: none;"
                 :error-message "Registration failed. Please try again."
                 :success-message ""))))
         ;; Show registration form (no POST data)
-        (render-template-with-plist "register"
+        (clip:process-to-string
+         (load-template "register")
          :title "Asteroid Radio - Register"
          :display-error "display: none;"
          :display-success "display: none;"
diff --git a/template/register.ctml b/template/register.ctml
index b9abff6..3d90ce0 100644
--- a/template/register.ctml
+++ b/template/register.ctml
@@ -21,11 +21,11 @@
     <div class="auth-container">
       <div class="auth-form">
         <h2>Create Account</h2>
-        <div class="message error" data-attr="style" data-attr-value="display-error" style="display: none;">
-          <span data-text="error-message">Registration failed</span>
+        <div class="message error" lquery="(attr :style display-error)" style="display: none;">
+          <span lquery="(text error-message)">Registration failed</span>
         </div>
-        <div class="message success" data-attr="style" data-attr-value="display-success" style="display: none;">
-          <span data-text="success-message">Registration successful!</span>
+        <div class="message success" lquery="(attr :style display-success)" style="display: none;">
+          <span lquery="(text success-message)">Registration successful!</span>
         </div>
         <form method="post" action="/asteroid/register">
           <div class="form-group">