invalidate session after account delete

2022-04-01 05:35:33 +02:00 · 2022-04-01 05:35:33 +02:00 · ee010f56b8
commit ee010f56b8
parent 1dd2706199
1 changed files with 3 additions and 1 deletions
--- a/src/permap.ml
+++ b/src/permap.ml
@ -207,7 +207,9 @@ let account_post request =
      (*TODO ask for confirmation *)
      let res =
        Result.fold ~error:Fun.id
-          ~ok:(fun () -> "Your account was deleted")
+          ~ok:(fun () ->
+            let _unit_lwt = Dream.invalidate_session request in
+            "Your account was deleted" )
          (User.delete_user user_id)
      in
      render_unsafe res request