diff options
author | David Barksdale <amatus.amongus@gmail.com> | 2011-09-29 22:58:31 -0500 |
---|---|---|
committer | David Barksdale <amatus.amongus@gmail.com> | 2011-09-29 22:58:31 -0500 |
commit | c686c335acd4acde09c13d45e3bffafc589abbf9 (patch) | |
tree | c6fe302d158f13941d0ce73a433838ba6c1e3cf3 | |
parent | 8835cc0e5ab69792b1dde62193549918b7f62436 (diff) |
Fixed calling of update-remote-peers! with the wrong number of arguments.
-rw-r--r-- | src/main/clojure/org/gnu/clojure/gnunet/transport.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/main/clojure/org/gnu/clojure/gnunet/transport.clj b/src/main/clojure/org/gnu/clojure/gnunet/transport.clj index 03475fd..703d5d5 100644 --- a/src/main/clojure/org/gnu/clojure/gnunet/transport.clj +++ b/src/main/clojure/org/gnu/clojure/gnunet/transport.clj @@ -329,7 +329,7 @@ ;; (.write *out* (str "Received " message "\n")) (send (:remote-peers-agent peer) (fn [remote-peers] - (let [remote-peers (update-remote-peers! remote-peers sender-id {}) + (let [remote-peers (update-remote-peers! remote-peers peer sender-id {}) remote-peer (remote-peers sender-id)] (condp = (:message-type message) message-type-hello (handle-hello! peer message) |