b68825f

src/net/bowmap/network/minecraft_server.clj modified (view file)

@@ -38,7 +38,7 @@         (recur (or (handle-packets!! client outgoing-messages) client))))     nil)) -(defn closable-promise+(defn closing-promise   "Returns a promise that closes 'ch' when it is resolved."   [ch]   (let [p (promise)]@@ -53,7 +53,7 @@    Delivering the promise will also close the server."   []   (let [clients (server/start-tcp-server! {:port 25565})-        shutdown (closable-promise clients)]+        shutdown (closing-promise clients)]     (io-thread       (loop []         (if-some [client (<!! clients)]