diff options
Diffstat (limited to '')
-rw-r--r-- | server/cldb.erl | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/server/cldb.erl b/server/cldb.erl index 0f9f407..9aad688 100644 --- a/server/cldb.erl +++ b/server/cldb.erl @@ -10,3 +10,14 @@ init() -> mnesia:create_table(track, [{attributes, record_info(fields, track)}]), io:format("Userdb up and running \n"). + +ask(User, Pwd) -> + F = fun() -> + mnesia:match_object({user, User, Pwd, _}), + end, + + + +login(User, Pwd) -> + {_, Reason} = ask(User, Pwd), + Reason. |