reduce the filesize of the map; try to optimise the compiled js

Makefile

@@ -3,7 +3,7 @@ DIRNAME=$(notdir $(CURDIR))
 ELMS=$(wildcard src/*.elm)
 
 app.js: src/App.elm $(ELMS)
-	-elm make $< --output=$@ 2> error.txt
+	-elm make --optimize $< --output=$@ 2> error.txt
 	@cat error.txt
 
 upload: app.js index.html style.css

src/App.elm

@@ -267,7 +267,7 @@ init_model flags =
   |> JD.decodeValue decode_flags 
   |> (\r -> case r of
     Ok flagdata -> { blank_model | stations = flagdata.stations, lines = flagdata.lines, current_station = Just flagdata.station }
-    Err err -> { blank_model | error = Just (Debug.log "error" err) }
+    Err err -> { blank_model | error = Just err }
   )
 
 nocmd model = (model, Cmd.none)
@@ -290,7 +290,7 @@ update msg model = case msg of
 
   ReceiveLocation data ->
     case JD.decodeValue (decode_geolocation) data of
-      Err err -> {model | error = Just (Debug.log "err" err) } |> nocmd
+      Err err -> {model | error = Just err } |> nocmd
       Ok latlon -> 
         let
           closest_stations = geo_closest_stations model latlon