From 600d76c49dd2b6fa2233be09edc5e76162e240c0 Mon Sep 17 00:00:00 2001 From: Pavel Murygin Date: Mon, 28 Jun 2021 16:22:12 +0300 Subject: [PATCH] add elm ui explorer --- .gitignore | 2 ++ .storybook/index.html | 24 ++++++++++++++++++++++++ elm.json | 15 +++++++++++++-- package.json | 4 +++- src_storybook/Explorer.elm | 25 +++++++++++++++++++++++++ 5 files changed, 67 insertions(+), 3 deletions(-) create mode 100644 .storybook/index.html create mode 100644 src_storybook/Explorer.elm diff --git a/.gitignore b/.gitignore index ff01139..0a54eec 100644 --- a/.gitignore +++ b/.gitignore @@ -4,3 +4,5 @@ node_modules dist bundle .cache + +.storybook/explorer.js \ No newline at end of file diff --git a/.storybook/index.html b/.storybook/index.html new file mode 100644 index 0000000..b5fdd45 --- /dev/null +++ b/.storybook/index.html @@ -0,0 +1,24 @@ + + + + + + + Elm Ui Explorer + + + + +
+ + + + diff --git a/elm.json b/elm.json index 3eeb3de..6229ec4 100644 --- a/elm.json +++ b/elm.json @@ -1,6 +1,6 @@ { "type": "application", - "source-directories": ["src"], + "source-directories": ["src", "src_storybook"], "elm-version": "0.19.1", "dependencies": { "direct": { @@ -15,14 +15,25 @@ "elm-community/intdict": "3.0.0", "elm-community/list-extra": "8.2.4", "elm-community/maybe-extra": "5.2.0", + "kalutheo/elm-ui-explorer": "9.0.0", "lukewestby/elm-string-interpolate": "1.0.4" }, "indirect": { + "1602/elm-feather": "2.3.4", + "NoRedInk/datetimepicker-legacy": "1.0.4", + "avh4/elm-debug-controls": "2.2.1", + "elm/parser": "1.1.0", "elm/random": "1.0.0", "elm/regex": "1.0.0", + "elm/svg": "1.0.1", "elm/time": "1.0.0", "elm/virtual-dom": "1.0.2", - "elm-explorations/test": "1.2.2" + "elm-explorations/markdown": "1.0.0", + "elm-explorations/test": "1.2.2", + "justinmimbs/date": "3.2.1", + "justinmimbs/time-extra": "1.1.0", + "rtfeldman/elm-css": "16.1.1", + "rtfeldman/elm-hex": "1.0.0" } }, "test-dependencies": { diff --git a/package.json b/package.json index 7479866..8772334 100644 --- a/package.json +++ b/package.json @@ -11,7 +11,8 @@ "prod": "webpack -p --mode production", "analyse": "elm-analyse -s -p 3001 -o", "compile-aqua": "aqua-cli --js -i ./aqua/ -o ./src/_aqua", - "watch-aqua": "chokidar \"**/*.aqua\" -c \"npm run compile-aqua\"" + "watch-aqua": "chokidar \"**/*.aqua\" -c \"npm run compile-aqua\"", + "uie": "elm-live src_storybook/Explorer.elm --open --dir=.storybook --start-page=index.html -- --output=.storybook/explorer.js --debug" }, "nodemonConfig": { "watch": [ @@ -37,6 +38,7 @@ "yup": "^0.32.9" }, "devDependencies": { + "elm-live": "^4.0.2", "@babel/core": "^7.11.6", "@babel/preset-env": "^7.11.5", "@fluencelabs/aqua-cli": "^0.1.7-153", diff --git a/src_storybook/Explorer.elm b/src_storybook/Explorer.elm new file mode 100644 index 0000000..73f45bc --- /dev/null +++ b/src_storybook/Explorer.elm @@ -0,0 +1,25 @@ +module Explorer exposing (main) + +import Html +import HubPage.View exposing (welcomeText) +import UIExplorer + exposing + ( UIExplorerProgram + , defaultConfig + , explore + , storiesOf + ) + + +main : UIExplorerProgram {} () {} {} +main = + explore + defaultConfig + [ storiesOf + "Welcome" + [ ( "Default", \_ -> Html.text "Welcome to you explorer.", {} ) + ] + , storiesOf + "HubView" + [ ( "1", \_ -> welcomeText, {} ) ] + ]