Implement column adding

voodoos · Oct 14, 2024 · 6218f20 · 6218f20
1 parent 6754346
commit 6218f20
Show file tree

Hide file tree

Showing 5 changed files with 231 additions and 125 deletions.
diff --git a/vendor/brr_lwd_ui/examples/virtual-table/main.ml b/vendor/brr_lwd_ui/examples/virtual-table/main.ml
@@ -19,10 +19,12 @@ let app =
   let table =
     {
       columns =
-        [|
-          Columns.v "a" "5em" [ `P (El.txt' "id") ];
-          Columns.v "a" "1fr" [ `P (El.txt' "square") ];
-        |];
+        Lwd.pure
+        @@ Lwd_seq.of_array
+             [|
+               Columns.v "a" "5em" [ `P (El.txt' "id") ];
+               Columns.v "a" "1fr" [ `P (El.txt' "square") ];
+             |];
     }
   in
   let table = { table; row_height = Em 5. } in

diff --git a/vendor/brr_lwd_ui/examples/yjs/dune b/vendor/brr_lwd_ui/examples/yjs/dune
@@ -11,7 +11,8 @@
   brr-lwd
   brr-lwd-ui
   brr-lwd-ui.bindings.yjs
-  hector))
+  hector
+  uuidm))
 
 (alias
  (name examples)

diff --git a/vendor/brr_lwd_ui/examples/yjs/main.css b/vendor/brr_lwd_ui/examples/yjs/main.css
@@ -1,16 +1,20 @@
+body {
+  margin: 0;
+}
 
 .flex {
     display: flex;
     flex-direction: column;
     height: 100vh;
+    padding: 1rem;
 }
 .flex .table {
     flex-grow: 1;
 }
 
 .flex .flex {
     margin-top: 2rem;
-    max-height: 33vh;
+    max-height: 66vh;
     flex-grow: 1;
 }
 
@@ -29,15 +33,15 @@
     display: none;
 
     &.visible {
-        display: block;
+        display: flex;
     }
 
+    align-items: center;
+
     position: absolute;
     top: 0;
     left: 0;
 
     width: 100%;
     height: 100%;
-
-    background-color: aquamarine;
 }