aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/main.lisp6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/main.lisp b/src/main.lisp
index 261d722..a700796 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -439,9 +439,9 @@
(with-plist (password1 password2 handle) (lzb:request-body)
(unless (equal password1 password2)
(http-err 400 "Passwords dont match"))
- (when (contributor-by-handle username)
- (http-err 403 (format nil "The name ~a is already taken." username)))
- (redeem-invite code username password1)
+ (when (contributor-by-handle handle)
+ (http-err 403 (format nil "The name ~a is already taken." handle)))
+ (redeem-invite code handle password1)
"true"))
(defendpoint* :post "/access" () ()