miso-examples 1.5.2.0 → 1.7.0.0

raw patch · 12 files changed

+12/−1 lines, 12 files

Files

canvas2d/Main.hs +1/−0
compose-update/Main.hs +1/−0
file-reader/Main.hs +1/−0
mario/Main.hs +1/−0
mathml/Main.hs +1/−0
miso-examples.cabal +1/−1
router/Main.hs +1/−0
svg/Main.hs +1/−0
three/Main.hs +1/−0
todo-mvc/Main.hs +1/−0
websocket/Main.hs +1/−0
xhr/Main.hs +1/−0

canvas2d/Main.hs view

@@ -35,6 +35,7 @@     subs   = []     events = defaultEvents     mountPoint = Nothing -- default to body+    logLevel = Off  updateModel   :: (Image,Image,Image)

compose-update/Main.hs view

@@ -97,6 +97,7 @@     events = defaultEvents     subs   = []     mountPoint = Nothing+    logLevel = Off  viewModel :: Model -> View Action viewModel (x, y) =

file-reader/Main.hs view

@@ -40,6 +40,7 @@       events = defaultEvents       subs   = []       view   = viewModel+      logLevel = Off  -- | Update your model updateModel :: Action -> Model -> Effect Action Model

mario/Main.hs view

@@ -66,6 +66,7 @@              , windowCoordsSub WindowCoords              ]     mountPoint = Nothing+    logLevel = Off  data Model = Model     { x :: !Double

mathml/Main.hs view

@@ -28,6 +28,7 @@     events = defaultEvents        -- default delegated events     subs   = []                   -- empty subscription list     mountPoint = Nothing          -- mount point for application (Nothing defaults to 'body')+    logLevel = Off  -- | Updates model, optionally introduces side effects updateModel :: Action -> Model -> Effect Action Model

miso-examples.cabal view

@@ -1,5 +1,5 @@ name:                miso-examples-version:             1.5.2.0+version:             1.7.0.0 category:            Web, Miso, Data Structures author:              David M. Johnson <djohnson.m@gmail.com> maintainer:          David M. Johnson <djohnson.m@gmail.com>

router/Main.hs view

@@ -55,6 +55,7 @@     subs   = [ uriSub HandleURI ]     view   = viewModel     mountPoint = Nothing+    logLevel = Off  -- | Update your model updateModel :: Action -> Model -> Effect Action Model

svg/Main.hs view

@@ -25,6 +25,7 @@                     M.insert (pack "touchstart") False $                     M.insert (pack "touchmove") False defaultEvents     subs          = [ mouseSub HandleMouse ]+    logLevel      = Off     mountPoint    = Nothing  emptyModel :: Model

three/Main.hs view

@@ -59,6 +59,7 @@                , initialAction = Init                , update = updateModel ref                , mountPoint = Nothing+               , logLevel = Off                , ..                }     where

todo-mvc/Main.hs view

@@ -101,6 +101,7 @@     events     = defaultEvents     mountPoint = Nothing     subs       = []+    logLevel   = Off  updateModel :: Msg -> Model -> Effect Msg Model updateModel NoOp m = noEff m

websocket/Main.hs view

@@ -44,6 +44,7 @@     uri = URL "wss://echo.websocket.org"     protocols = Protocols [ ]     mountPoint = Nothing+    logLevel = Off  updateModel :: Action -> Model -> Effect Action Model updateModel (HandleWebSocket (WebSocketMessage (Message m))) model

xhr/Main.hs view

@@ -42,6 +42,7 @@       events = defaultEvents       subs   = []       view   = viewModel+      logLevel = Off  -- | Update your model updateModel :: Action -> Model -> Effect Action Model