swrup/geochan
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

set up user session on login

Browse source
This commit is contained in:
pena 2021-11-07 10:21:01 +01:00 • committed by Swrup
parent b2ecec7808
commit c7aa8aaad7
4 changed files with 27 additions and 15 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/login.eml.html
View file

@ -2,7 +2,7 @@ let f ?nick ?password request =
% begin match nick, password with
% | Some nick, Some password ->
% begin match User.login ~nick ~password with
% begin match User.login ~nick ~password request with
% | Error e ->
Error: <%s e %>
% | Ok () ->