wip

MaxWilson · Jan 28, 2023 · de3a37d · de3a37d
1 parent d8f742c
commit de3a37d
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/src/App.fs b/src/App.fs
@@ -92,7 +92,7 @@ let view (model:Model) dispatch =
         | InProgress -> Html.div [prop.text "Retreiving identity..."]
         | Ready None -> Html.div [Html.text "Hello, stranger."; LoginButton dispatch]
         | Ready (Some ((Facebook | AAD | Erroneous), accountName)) -> Html.div [Html.text $"Hello, {accountName}"; Html.button [prop.text "Log out"; prop.onClick (thunk1 navigateTo @".auth/logout")]]
-        sketchpad()
+        SketchPad()
         Html.div [
             Html.textarea [
                 prop.placeholder "enter some text"

diff --git a/src/Components.fs b/src/Components.fs
@@ -36,7 +36,7 @@ open SketchCanvas
 open Fable.Core.JsInterop
 
 [<ReactComponent>]
-let sketchpad dispatch =
+let SketchPad dispatch =
     let canvas = React.useRef(None)
     let html, htmlUpdate = React.useState "Press the Export SVG button"
     let lastPath, lastPathUpdate = React.useState "No paths yet"