Call dissoc with apply to delete keys in the rest arguments

Guanpeng Xu · Guanpeng Xu · commit ff77c62b1c86 · 2013-01-07T15:14:25.000+08:00
diff --git a/src/clj/backtype/storm/daemon/worker.clj b/src/clj/backtype/storm/daemon/worker.clj
@@ -252,7 +252,7 @@
                 (.close (get @(:cached-node+port->socket worker) endpoint)))
               (apply swap!
                      (:cached-node+port->socket worker)
-                     #(HashMap. (dissoc (into {} %1) %&))
+                     #(HashMap. (apply dissoc (into {} %1) %&))
                      remove-connections)
               
               (let [missing-tasks (->> needed-tasks
