Generate srcset images for a variety of resolutions from OCaml
cmdline
+2
-2
+2
-2
bin/srcsetter.ml
+2
-2
bin/srcsetter.ml
···
77
77
if String.starts_with ~prefix:"/" p then Eio.(Path.(Stdenv.fs env / p))
78
78
else Eio.(Path.(Stdenv.cwd env / p))
79
79
in
80
-
let src_dir = path_env "bushel/images" in
81
-
let dst_dir = path_env "site/images" in
80
+
let src_dir = path_env Sys.argv.(1) in
81
+
let dst_dir = path_env Sys.argv.(2) in
82
82
let proc_mgr = Eio.Stdenv.process_mgr env in
83
83
let idx_file = "index.json" in
84
84
let img_widths =