@@ -11,7 +11,7 @@ import qualified Language.Elm as Elm
1111
1212serve :: String -> IO ()
1313serve libLoc = do
14− putStrLn "Elm Server 0.1.2: running at <http://localhost:8000>"
14+ putStrLn "Elm Server 0.2: running at <http://localhost:8000>"
1515 simpleHTTP nullConf $ do
1616 _ <- compressedResponseFilter
1717 msum [ uriRest (serveElm libLoc)
@@ -34,7 +34,7 @@ main = getArgs >>= parse
3434
3535parse :: [String] -> IO ()
3636parse ("--help":_) = putStrLn usage
37−parse ("--version":_) = putStrLn "The Elm Server 0.1.2"
37+parse ("--version":_) = putStrLn "The Elm Server 0.2"
3838parse [] = serve "/elm-mini.js"
3939parse [arg]
4040 | "--runtime-location=" `isPrefixOf` arg =