Makefile

@@ -26,9 +26,12 @@ $(PUBLIC_DIR):
 $(PUBLIC_DIR)/index.html: $(FRONTEND_DIR)/index.html $(PUBLIC_DIR)
 	cp $< $@
 
+$(FRONTEND_DIR)/elm.min.js:
+	make -C $(FRONTEND_DIR)
+
 .PHONY: frontend backend
 
-frontend: $(PUBLIC_DIR)/index.html $(PUBLIC_DIR)
+frontend: $(PUBLIC_DIR)/index.html $(FRONTEND_DIR)/elm.min.js $(PUBLIC_DIR)
 	cp $(FRONTEND_DIR)/elm.min.js $(PUBLIC_DIR)/
 	cp $(FRONTEND_DIR)/src/ports.websocket.js $(PUBLIC_DIR)/
 	mkdir -p $(PUBLIC_DIR)/assets
@@ -37,7 +40,6 @@ backend:
 	$(CARGO_BUILD) --manifest-path=$(BACKEND_DIR)/Cargo.toml
 
 serve: frontend backend
-	make -C $(FRONTEND_DIR)
 ifeq ($(DEBUG),1)
 	RUST_LOG=info,actix_web=debug $(CARGO_RUN) --manifest-path=$(BACKEND_DIR)/Cargo.toml
 else ifeq ($(RELEASE),1)

frontend/Makefile

@@ -2,8 +2,6 @@ SRC_FILES := $(shell find src -name "*.elm")
 
 all: elm.min.js
 
-.PHONY: elm.min.js
-
 ifeq ($(DEBUG)$(RELEASE),) # Both are empty
 $(error You must set exactly one of DEBUG=1 or RELEASE=1)
 endif
@@ -13,7 +11,7 @@ $(error Both DEBUG and RELEASE cannot be set at the same time)
 endif
 
 
-elm.min.js:
+elm.min.js: $(SRC_FILES)
 ifeq ($(DEBUG),1)
 	./build.sh --debug src/Main.elm
 else ifeq ($(RELEASE),1)

frontend/src/Page/Landing.elm

@@ -10,8 +10,6 @@ import Element exposing (Element)
 import Websockets
 import Ports
 import Json.Decode as Decode
-import Html.Attributes exposing (placeholder)
-import Element.Input
 
 type alias Model = {
     time : String
@@ -22,7 +20,6 @@ type alias Landing = {
 type Msg
     = ToFrontend Landing
     | DecodeError Decode.Error
-    | GreetWidgetText String
     | NoOp
 
 init : () -> Model
@@ -57,23 +54,9 @@ update msg model =
         ToFrontend landing -> ( {model | time = landing.time}, Cmd.none )
         _ -> (model, Cmd.none)
 
-greetWidget =
-    let
-        textInput =
-            Element.Input.text []
-                { onChange = GreetWidgetText
-                , text = "text"
-                , placeholder = Nothing
-                , label = Element.Input.labelHidden "Greet"
-                }
-    in
-        Element.row []
-            [ textInput ]
-
 view : Model -> Element Msg
 view model =
     Element.column []
-        [ Element.text "Landing"
-        , Element.text <| "Current time is : " ++ model.time
-        , greetWidget
+        [ Element.text "Landing",
+          Element.text <| "Current time is : " ++ model.time
         ]