From 6b1f8c043b61d27be473b90cf79a09a49297ce0f Mon Sep 17 00:00:00 2001 From: Nathanael Sensfelder Date: Fri, 10 Aug 2018 17:11:42 +0200 Subject: Woops, better pay attention to character case. --- src/login/query/lgn_sign_up.erl | 15 +++++++++------ 1 file changed, 9 insertions(+), 6 deletions(-) (limited to 'src/login/query/lgn_sign_up.erl') diff --git a/src/login/query/lgn_sign_up.erl b/src/login/query/lgn_sign_up.erl index ce35557..6a2b3d5 100644 --- a/src/login/query/lgn_sign_up.erl +++ b/src/login/query/lgn_sign_up.erl @@ -54,11 +54,14 @@ register_user (Input) -> Password = Input#input.password, Email = Input#input.email, - shr_janitor:new(login_db, Username), - shr_janitor:new(login_db, Email), + UsernameLC = string:lowercase(Username), + EmailLC = string:lowercase(Email), - ok = shr_database:reserve(login_db, Username, janitor), - ok = shr_database:reserve(login_db, Email, janitor), + shr_janitor:new(login_db, UsernameLC), + shr_janitor:new(login_db, EmailLC), + + ok = shr_database:reserve(login_db, UsernameLC, janitor), + ok = shr_database:reserve(login_db, EmailLC, janitor), Player = shr_player:new(<<"">>, Username, Password, Email), @@ -83,13 +86,13 @@ register_user (Input) -> ok = shr_database:commit ( - shr_db_query:new(login_db, Username, janitor, LoginUpdateQueryOps) + shr_db_query:new(login_db, UsernameLC, janitor, LoginUpdateQueryOps) ), ok = shr_database:commit ( - shr_db_query:new(login_db, Email, janitor, LoginUpdateQueryOps) + shr_db_query:new(login_db, EmailLC, janitor, LoginUpdateQueryOps) ), ok = -- cgit v1.2.3-70-g09d2