2023-05-22 11:20:53 +00:00
|
|
|
open Yocaml
|
|
|
|
|
|
|
|
let is_css = with_extension "css"
|
2023-11-14 10:35:11 +00:00
|
|
|
let is_javascript =
|
|
|
|
let open Preface.Predicate in
|
|
|
|
with_extension "js" ||
|
|
|
|
with_extension "map"
|
2023-05-22 11:20:53 +00:00
|
|
|
|
|
|
|
let is_image =
|
|
|
|
let open Preface.Predicate in
|
|
|
|
with_extension "png" ||
|
|
|
|
with_extension "svg" ||
|
|
|
|
with_extension "jpg" ||
|
|
|
|
with_extension "jpeg" ||
|
|
|
|
with_extension "gif"
|
|
|
|
|
|
|
|
let is_markdown =
|
|
|
|
let open Preface.Predicate in
|
|
|
|
with_extension "md" || with_extension "markdown"
|