diff options
Diffstat (limited to 'theme')
| -rwxr-xr-x | theme/dune | 7 | ||||
| -rwxr-xr-x | theme/nord.ml | 39 | ||||
| -rwxr-xr-x | theme/theme.ml | 1 |
3 files changed, 0 insertions, 47 deletions
diff --git a/theme/dune b/theme/dune deleted file mode 100755 index a812bef..0000000 --- a/theme/dune +++ /dev/null @@ -1,7 +0,0 @@ -(library - (name theme) - (libraries - color - gg - ) - ) diff --git a/theme/nord.ml b/theme/nord.ml deleted file mode 100755 index 4748d83..0000000 --- a/theme/nord.ml +++ /dev/null @@ -1,39 +0,0 @@ -open StdLabels - -let default = Color.of_rgb 5 255 255 - -let theme = - [| "#2e3440" - ; "#3b4252" - ; "#434c5e" - ; "#4c566a" - (* Bright *) - ; "#d8dee9" - ; "" - ; "#eceff4" - (* Frost *) - ; "#8fbcbb" - ; "" - ; "" - ; "" - (* Aurora 11 - *) - ; "#bf616a" (* Redd color *) - ; "" - ; "" - ; "#a3be8c" (* Green color *) - - - |] - |> Array.map ~f:(fun f -> - Color.of_hexstring f - |> Option.value ~default - ) - -let set_color t f = - let Color.Rgba'.{r; g; b; _ } = Color.to_rgba' (Array.get theme t) in - f r g b - - -let to_gg t = - let Color.Rgba'.{r; g; b; _ } = Color.to_rgba' (Array.get theme t) in - Gg.Color.of_srgb (Gg.V4.v r g b 1.) diff --git a/theme/theme.ml b/theme/theme.ml deleted file mode 100755 index 39974b1..0000000 --- a/theme/theme.ml +++ /dev/null @@ -1 +0,0 @@ -module Nord = Nord |