Made try-port error handling more specific

This commit is contained in:
James Reeves 2012-02-11 21:08:06 +00:00
parent ee9c8eecad
commit 2bf33a33a6

View file

@ -10,7 +10,7 @@
(if-not (sequential? port)
(run-server port)
(try (run-server (first port))
(catch Exception ex
(catch java.net.BindException ex
(if-let [port (next port)]
(try-port port run-server)
(throw ex))))))