notes example
This commit is contained in:
parent
61939f88c9
commit
7837700452
1 changed files with 6 additions and 7 deletions
|
|
@ -109,9 +109,8 @@
|
|||
(loop []
|
||||
(let [client-socket (.accept server-socket)]
|
||||
(future
|
||||
(try
|
||||
(/ 1 0)
|
||||
(with-open [conn client-socket]
|
||||
(try
|
||||
(let [out (io/writer (.getOutputStream conn))
|
||||
is (.getInputStream conn)
|
||||
in (io/reader is)
|
||||
|
|
@ -142,8 +141,8 @@
|
|||
(basic-auth-response out uuid))
|
||||
(not (authenticate! session-id headers))
|
||||
(basic-auth-response out session-id)
|
||||
:else (home-response out session-id))))
|
||||
:else (home-response out session-id)))
|
||||
(catch Throwable t
|
||||
(binding [*err* *out*]
|
||||
(println t))))))
|
||||
(println t)))))))
|
||||
(recur)))
|
||||
|
|
|
|||
Loading…
Reference in a new issue