put all image stuff in image.ml, make thumbnail for avatars

This commit is contained in:
Swrup 2022-04-04 14:39:25 +02:00
parent dbc2139511
commit 9ca17a8840
7 changed files with 240 additions and 186 deletions

View file

@ -88,3 +88,5 @@ let get_dirs name =
let admins = get_dirs "admin"
let categories = List.sort_uniq compare (get_dirs "category")
let random_state = Random.State.make_self_init ()