git.iko.soy/obelisk
on master help sign in
Test debug menu
commit78a5c694c1929e4133bf7cf9043170bc82b68def authorAlexandre Esteves <alexandre.fmp.esteves@gmail.com> dateSat 25 Jan 2020, 18:32 (7 years ago) parent796fac5
3 files changed+16−2
compare with master
unifiedsplit
skeleton/default.nix+12−1 skeleton/frontend/frontend.cabal+1 skeleton/frontend/src/Frontend.hs+3−1
skeleton/default.nix+12−1
@@ -8,9 +8,20 @@
88 }
99}:
1010with obelisk;
11−project ./. ({ ... }: {
11+project ./. ({ pkgs, hackGet, ... }: {
1212 android.applicationId = "systems.obsidian.obelisk.examples.minimal";
1313 android.displayName = "Obelisk Minimal Example";
1414 ios.bundleIdentifier = "systems.obsidian.obelisk.examples.minimal";
1515 ios.bundleName = "Obelisk Minimal Example";
16+
17+ packages = {
18+ reflex-dom-core = (hackGet ./dep/reflex-dom) + /reflex-dom-core;
19+ };
20+
21+ overrides = self: super: {
22+ ghcjs-dom = pkgs.haskell.lib.overrideCabal (super.ghcjs-dom) (drv: {
23+ configureFlags = [ "-fdebug" ];
24+ });
25+ reflex-dom-core = pkgs.haskell.lib.dontCheck super.reflex-dom-core;
26+ };
1627})
skeleton/frontend/frontend.cabal+1
@@ -7,6 +7,7 @@ library
77 hs-source-dirs: src
88 build-depends: base
99 , common
10+ , ghcjs-dom
1011 , obelisk-frontend
1112 , obelisk-route
1213 , jsaddle
skeleton/frontend/src/Frontend.hs+3−1
@@ -19,6 +19,7 @@ import Reflex.Dom.Core
1919import Common.Api
2020import Common.Route
2121
22+import GHCJS.DOM.Debug
2223
2324-- This runs in a monad that can be run on the client or the server.
2425-- To run code in a pure client or pure server context, use one of the
@@ -29,9 +30,10 @@ frontend = Frontend
2930 el "title" $ text "Obelisk Minimal Example"
3031 elAttr "link" ("href" =: static @"main.css" <> "type" =: "text/css" <> "rel" =: "stylesheet") blank
3132 , _frontend_body = do
33+ prerender_ blank $ void addDebugMenu
3234 el "h1" $ text "Welcome to Obelisk!"
3335 el "p" $ text $ T.pack commonStuff
34−
36+
3537 -- `prerender` and `prerender_` let you choose a widget to run on the server
3638 -- during prerendering and a different widget to run on the client with
3739 -- JavaScript. The following will generate a `blank` widget on the server and