@@ -11,7 +11,7 @@ import Language.Elm
1111
1212serve :: String -> IO ()
1313serve libLoc = do
14− putStrLn "Elm Server 0.1.1.6: running at <http://localhost:8000>"
14+ putStrLn "Elm Server 0.1.1.7: running at <http://localhost:8000>"
1515 simpleHTTP nullConf $ do
1616 compressedResponseFilter
1717 msum [ uriRest (serveElm libLoc)
@@ -31,7 +31,7 @@ serveElm libLoc fp = do
3131main = getArgs >>= parse
3232
3333parse ("--help":_) = putStrLn usage
34−parse ("--version":_) = putStrLn "The Elm Server 0.1.1.6"
34+parse ("--version":_) = putStrLn "The Elm Server 0.1.1.7"
3535parse [] = serve "/elm-mini.js"
3636parse [arg]
3737 | "--runtime-location=" `isPrefixOf` arg =