From ab5b2301dc713640170a7026c5ab1870a9ce4a5b Mon Sep 17 00:00:00 2001 From: Adam Kocoloski Date: Mon, 13 Sep 2010 11:02:23 -0400 Subject: accept logins with 'name' instead of 'username', thanks artemb --- apps/chttpd/src/chttpd_auth.erl | 6 ++++-- 1 file changed, 4 insertions(+), 2 deletions(-) diff --git a/apps/chttpd/src/chttpd_auth.erl b/apps/chttpd/src/chttpd_auth.erl index ac4679c5..24fe8c05 100644 --- a/apps/chttpd/src/chttpd_auth.erl +++ b/apps/chttpd/src/chttpd_auth.erl @@ -351,7 +351,8 @@ delete_user(#httpd{user_ctx=UserCtx}=Req, Db, UserName) -> end. extract_username(Form) -> - try ?l2b(couch_util:get_value("username", Form)) + CouchFormat = couch_util:get_value("name", Form), + try ?l2b(couch_util:get_value("username", Form, CouchFormat)) catch error:badarg -> throw({bad_request, <<"user accounts must have a username">>}) end. @@ -363,8 +364,9 @@ extract_password(Form) -> end. extract_username_password(Form) -> + CouchFormat = couch_util:get_value("name", Form), try - {?l2b(couch_util:get_value("username", Form)), + {?l2b(couch_util:get_value("username", Form, CouchFormat)), ?l2b(couch_util:get_value("password", Form))} catch error:badarg -> Msg = <<"user accounts must have a username and password">>, -- cgit v1.2.3