hg.stevelosh.com > clojurecraft

4d24dfe2cab1 

Whitespace.
[view raw] [browse files]
author Steve Losh <steve@stevelosh.com>
date Fri, 24 Jun 2011 19:27:03 -0400
parents 11a29fd36b15
children a96c06febb53
branches/tags (none)
files src/clojurecraft/core.clj

Changes

--- a/src/clojurecraft/core.clj	Fri Jun 24 19:24:44 2011 -0400
+++ b/src/clojurecraft/core.clj	Fri Jun 24 19:27:03 2011 -0400
@@ -12,9 +12,9 @@
 ; Connection Wrappers --------------------------------------------------------------
 (defn connect [server]
   (let [socket (Socket. (:name server) (:port server))
-               in (DataInputStream. (.getInputStream socket))
-               out (DataOutputStream. (.getOutputStream socket))
-               conn (ref {:in in :out out})]
+        in (DataInputStream. (.getInputStream socket))
+        out (DataOutputStream. (.getOutputStream socket))
+        conn (ref {:in in :out out})]
     (doto (Thread. #(conn-handler conn)) (.start))
     conn))