change from deprecated and removed aNY_PORT to defaultPort

(Both are just 0 internally.)

Utility/WebApp.hs

@@ -93,7 +93,7 @@ getSocket h = do
 	addr <- inet_addr "127.0.0.1"
 	sock <- socket AF_INET Stream defaultProtocol
 	preparesocket sock
-	bind sock (SockAddrInet aNY_PORT addr)
+	bind sock (SockAddrInet defaultPort addr)
 	use sock
   where
 #else