Skip to content
Snippets Groups Projects
Commit 2bc62d54 authored by Florian Sesser's avatar Florian Sesser
Browse files

Merge branch 'add-instructions-to-start-screen' into 'main'

Add instructions where to get PrivateStorage Desktop to start screen

See merge request !60
parents cca6808e 45ba9af7
Branches
Tags
1 merge request!60Add instructions where to get PrivateStorage Desktop to start screen
Pipeline #4935 passed
...@@ -20,6 +20,7 @@ firstRunPage = do ...@@ -20,6 +20,7 @@ firstRunPage = do
elClass "div" "subtext mdc-typography--body2" $ do elClass "div" "subtext mdc-typography--body2" $ do
el "p" $ text "This app requires access to PrivateStorage." el "p" $ text "This app requires access to PrivateStorage."
el "p" $ text "Please ensure the PrivateStorage desktop app is installed and running before proceeding." el "p" $ text "Please ensure the PrivateStorage desktop app is installed and running before proceeding."
el "p" $ text "Visit https://private.storage/ on your desktop or laptop computer to get started."
(readyButton, _) <- elAttr' "button" ("class" =: "mdc-button mdc-button--raised" <> "data-mdc-auto-init" =: "MDCRipple") $ do (readyButton, _) <- elAttr' "button" ("class" =: "mdc-button mdc-button--raised" <> "data-mdc-auto-init" =: "MDCRipple") $ do
elClass "span" "mdc-button__ripple" blank elClass "span" "mdc-button__ripple" blank
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment