Remove elm.js and split out Main.elm

.gitignore

@@ -1,2 +1,3 @@
 elm-stuff
 node_modules
+elm.js

stages/5/index.html

@@ -16,10 +16,10 @@
 </body>
 
 <script type="text/javascript">
-  var app = Elm.fullscreen(Elm.ElmHub, {});
+  var app = Elm.fullscreen(Elm.Main, {});
 
   // Uncomment this line and comment out the above to enable elm-reactor support.
-  // var app = Elm.fullscreenDebug("ElmHub", "ElmHub.elm");
+  // var app = Elm.fullscreenDebug("ElmHub", "Main.elm");
 </script>
 
 </html>

stages/5/package.json

@@ -3,8 +3,8 @@
   "version": "1.0.0",
   "description": "Like GitHub, but for Elm stuff.",
   "scripts": {
-    "build": "elm-make src/ElmHub.elm --output elm.js",
-    "watch": "../../node_modules/.bin/elm-live src/ElmHub.elm --open -- --output=elm.js",
+    "build": "elm-make src/Main.elm --output elm.js",
+    "watch": "../../node_modules/.bin/elm-live src/Main.elm --open -- --output=elm.js",
     "test": "../../node_modules/.bin/elm-test test/TestRunner.elm",
     "install": "npm run build"
   },

stages/5/src/ElmHub.elm

@@ -12,26 +12,6 @@ import Json.Encode
 import Signal exposing (Address)
 
 
-main : Signal Html
-main =
-  app.html
-
-
-app : StartApp.App Model
-app =
-  StartApp.start
-    { view = view
-    , update = update
-    , init = ( initialModel, Effects.task (searchFeed initialModel.query) )
-    , inputs = []
-    }
-
-
-port tasks : Signal (Task Effects.Never ())
-port tasks =
-  app.tasks
-
-
 searchFeed : String -> Task x Action
 searchFeed query =
   let

stages/5/src/Main.elm

@@ -0,0 +1,27 @@
+module Main (..) where
+
+import StartApp
+import ElmHub exposing (..)
+import Effects exposing (Effects)
+import Task exposing (Task)
+import Html exposing (Html)
+
+
+main : Signal Html
+main =
+  app.html
+
+
+app : StartApp.App Model
+app =
+  StartApp.start
+    { view = view
+    , update = update
+    , init = ( initialModel, Effects.task (searchFeed initialModel.query) )
+    , inputs = []
+    }
+
+
+port tasks : Signal (Task Effects.Never ())
+port tasks =
+  app.tasks