Add FontAwesome backspace

revery-ui · Jan 4, 2019 · 4771411 · 4771411
1 parent b0782b0
commit 4771411
Show file tree

Hide file tree

Showing 3 changed files with 8 additions and 4 deletions.
diff --git a/examples/Calculator.re b/examples/Calculator.re
@@ -5,6 +5,8 @@ open Revery.Core.Window;
 open Revery.UI;
 open Revery.UI.Components;
 
+open CamomileLibraryDefault.Camomile;
+
 module Row = (
   val component((render, ~children, ()) =>
         render(
@@ -45,7 +47,7 @@ module Column = (
 );
 
 module Button = (
-  val component((render, ~contents: string, ~onClick, ~children, ()) =>
+  val component((render, ~fontFamily="Roboto-Regular.ttf", ~contents: string, ~onClick, ~children, ()) =>
         render(
           () => {
             let viewStyle =
@@ -64,7 +66,7 @@ module Button = (
             let textStyle =
               Style.make(
                 ~color=Colors.black,
-                ~fontFamily="Roboto-Regular.ttf",
+                ~fontFamily,
                 ~fontSize=32,
                 (),
               );
@@ -292,7 +294,8 @@ module Calculator = (
                 />
                 /* TODO: Switch to a font with a backspace character */
                 <Button
-                  contents="<="
+                  fontFamily="FontAwesome5FreeSolid.otf"
+                  contents=Zed_utf8.singleton(UChar.of_int(0xF55A))
                   onClick={_ => dispatch(BackspaceKeyPressed)}
                 />
               </Row>

diff --git a/examples/FontAwesome5FreeSolid.otf b/examples/FontAwesome5FreeSolid.otf
diff --git a/examples/dune b/examples/dune
@@ -9,8 +9,9 @@
         str
         Revery
         flex
+        zed
             ))
 (install
     (section bin)
     (package Revery)
-    (files Roboto-Regular.ttf binary.dat index.html Hello.bc.js gl-matrix-min.js outrun-logo.png))
+    (files Roboto-Regular.ttf FontAwesome5FreeSolid.otf binary.dat index.html Hello.bc.js gl-matrix-min.js outrun-logo.png))