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

escape bio

Browse source
This commit is contained in:
zapashcanon 2021-11-07 22:50:43 +01:00
parent 3487a47511
commit af0c7dea0f
No known key found for this signature in database
GPG key ID: 8981C3C62D1D28F1
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 |] [ [| Data.TEXT nick; Data.TEXT password; Data.TEXT email; Data.TEXT bio |]
] -> ] ->
Format.sprintf "nick = `%s`; password = `%s`; email = `%s`; bio = '%s'" nick Format.sprintf "nick = `%s`; password = `%s`; email = `%s`; bio = '%s'" nick
password email bio password email (Dream.html_escape bio)
| Ok _ -> "incoherent db answer" | Ok _ -> "incoherent db answer"
| Error e -> Format.sprintf "db error: %s" (Rc.to_string e) | Error e -> Format.sprintf "db error: %s" (Rc.to_string e)