server: make the listen port configurable through environment

Deploying to App Engine require the port to be initialized through
environment variable PORT.

1 files changed, 8 insertions, 2 deletions

diff --git a/server.go b/server.go
index e3ed460..ef7f930 100644
--- a/server.go
+++ b/server.go
@@ -49,9 +49,15 @@ type Server struct {
 // storage.
 //
 func NewServer(kamusStorage string) (server *Server, err error) {
+	address := defListen
+	port := os.Getenv(envPort)
+	if len(port) > 0 {
+		address = ":" + port
+	}
+
 	opts := &http.ServerOptions{
-		Root:    defRootDir,
-		Address: defListen,
+		Root:    "",
+		Address: address,
 	}
 
 	if debug.Value > 0 {