    (vec (map #(if (= % (channels channel-i))
                 (assoc % :title value) 
                 %) channels))))
+
 
 
 ;; todo decouple this

              (assoc % :items (delete (:items %) item)) 
              %) channels))))


(register-handler 
 :channel-set-mix

(defn delete [vect item]
  (vec (remove (fn [word] (= word item)) vect)))

(defn update-item [vect item text]
  (let [i (.indexOf (to-array vect) item)]
    (if (>= i 0)
      (assoc vect i text)
      vect)))

(register-handler 
 :delete
 channel-mw
