diff options
| author | David Barksdale <amatus.amongus@gmail.com> | 2010-10-03 22:43:34 -0700 |
|---|---|---|
| committer | David Barksdale <amatus.amongus@gmail.com> | 2010-10-03 22:43:34 -0700 |
| commit | 5030725cdf24e036d95200f1fe5aac88e29febe7 (patch) | |
| tree | ce4bbb777465f684b272ac3c798acccb33739682 /src/org/gnu/clojure/gnunet/transport.clj | |
| parent | decfa471ee11fe1cbb835c20e8c1e4ab9c44e04e (diff) | |
Now we're creating sockets and selectors and selectable channels, oh my!
Diffstat (limited to 'src/org/gnu/clojure/gnunet/transport.clj')
| -rw-r--r-- | src/org/gnu/clojure/gnunet/transport.clj | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/org/gnu/clojure/gnunet/transport.clj b/src/org/gnu/clojure/gnunet/transport.clj index c35bcaa..19cdb63 100644 --- a/src/org/gnu/clojure/gnunet/transport.clj +++ b/src/org/gnu/clojure/gnunet/transport.clj @@ -62,7 +62,7 @@ :id (generate-id (:public-key hello)) :transport-addresses-agent (agent (merge-transport-addresses {} (:transport-addresses hello))) - :connection-agent (agent nil))) + :connection-agent (agent {}))) ;; Event - Peer receives a HELLO message (defn admit-hello! @@ -119,7 +119,7 @@ [peer remote-peer] (send (:connection-agent remote-peer) (fn [connection] - (if (nil? connection) + (if (contains? connection :transport) (let [{transport :transport address :address} (best-transport peer remote-peer)] (do |