package bonsai

  1. Overview
  2. Docs
package bonsai
Legend:
Page
Library
Module
Module type
Parameter
Class
Class type
Source

Source file app__generated.ml

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
include struct
  [@@@ocaml.warning "-32"]
  let () =
    Inline_css.Private.append
      {|
/* _none_ */

@layer kado.app{
 *:root:has(.app_hash_3598a20e50) {
  font-family:"Inter",sans-serif;
  accent-color:#1ba1f2
 }
 
 *.app_hash_3598a20e50.set-min-height-to-100vh_hash_3598a20e50 {
  min-height:100vh
 }
 
 *:root:has(.app_hash_3598a20e50.dark_hash_3598a20e50),*.app_hash_3598a20e50.dark_hash_3598a20e50 {
  color-scheme:dark;
  background:var(--bg_hash_3598a20e50,#1a1d21)
 }
 
 *:root:has(.app_hash_3598a20e50.light_hash_3598a20e50),*.app_hash_3598a20e50.light_hash_3598a20e50 {
  color-scheme:light;
  background:var(--bg_hash_3598a20e50,#e5e2de)
 }
 
 *:root:has(.app_hash_3598a20e50) *::selection {
  background:#1ba1f2;
  color:white
 }
 
 *:root:has(.app_hash_3598a20e50) *,*:root:has(.app_hash_3598a20e50) *::before,*:root:has(.app_hash_3598a20e50) *::after {
  box-sizing:border-box
 }
 
}|}
  let (__type_info_for_ppx_css :
    ?rewrite:(string * string) list ->
      ?dont_hash:string list ->
        ?dont_hash_prefixes:string list -> string -> unit)
    =
    fun ?rewrite:_ ->
      fun ?dont_hash:_ -> fun ?dont_hash_prefixes:_ -> fun _ -> ()
  module type S  =
    sig
      module Variables :
      sig val set : ?bg:string -> unit -> Virtual_dom.Vdom.Attr.t end
      module For_referencing :
      sig
        val app : string
        val bg : string
        val dark : string
        val light : string
        val set_min_height_to_100vh : string
      end
      val app : Virtual_dom.Vdom.Attr.t
      val dark : Virtual_dom.Vdom.Attr.t
      val light : Virtual_dom.Vdom.Attr.t
      val set_min_height_to_100vh : Virtual_dom.Vdom.Attr.t
    end
  type t = (module S)
  module Default : S =
    struct
      module Variables =
        struct
          let set ?bg  () =
            let ppx_css_acc__001_ = [] in
            let ppx_css_acc__001_ =
              match bg with
              | None -> ppx_css_acc__001_
              | Some ppx_css_value__002_ ->
                  ({|--bg_hash_3598a20e50|}, ppx_css_value__002_) ::
                  ppx_css_acc__001_ in
            Virtual_dom.Vdom.Attr.__css_vars_no_kebabs ppx_css_acc__001_
        end
      module For_referencing =
        struct
          let light = {|light_hash_3598a20e50|}
          let app = {|app_hash_3598a20e50|}
          let dark = {|dark_hash_3598a20e50|}
          let set_min_height_to_100vh =
            {|set-min-height-to-100vh_hash_3598a20e50|}
          let bg = {|--bg_hash_3598a20e50|}
        end
      let light = Virtual_dom.Vdom.Attr.class_ {|light_hash_3598a20e50|}
      let app = Virtual_dom.Vdom.Attr.class_ {|app_hash_3598a20e50|}
      let dark = Virtual_dom.Vdom.Attr.class_ {|dark_hash_3598a20e50|}
      let set_min_height_to_100vh =
        Virtual_dom.Vdom.Attr.class_
          {|set-min-height-to-100vh_hash_3598a20e50|}
    end 
  include Default
  let default : t = (module Default) end
OCaml

Innovation. Community. Security.

GitHub Discord Twitter Peertube RSS
About
Changelog Releases Industrial Users Academic Users Why OCaml
Ecosystem
Packages Community Events OCaml Planet Jobs
Resources
Install OCaml Get Started Platform Tools Language Manual Standard Library API Books Exercises Papers OCaml Playground Logo
Policies
Carbon Footprint Governance Privacy Code of Conduct