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

escape bio

Browse source
This commit is contained in:
pena 2021-11-07 22:50:43 +01:00 • committed by Swrup
parent b7642d3c54
commit 4a23867a64
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/user.ml
View file

@ -120,7 +120,7 @@ let public_profile request =
[ [| Data.TEXT nick; Data.TEXT password; Data.TEXT email; Data.TEXT bio |]
] ->
Format.sprintf "nick = `%s`; password = `%s`; email = `%s`; bio = '%s'" nick
password email bio
password email (Dream.html_escape bio)
| Ok _ -> "incoherent db answer"
| Error e -> Format.sprintf "db error: %s" (Rc.to_string e)