          (render-filter filter)
          [render-add-card on-add-card]
          [render-toggle-all on-toggle-all]
-         [render-board @filtered
-          (render-card on-toggle-card on-remove-task on-check-task on-add-task)]
+         [render-board
+          (render-card on-toggle-card on-remove-task on-check-task on-add-task)
+          @filtered]
         ]))
   ))
 

   :backgroundColor (-> card :category category->color)
  })

(defn filter-by-status
  "Filter card by status"
  [status cards]
  (filter #(= status (:status %)) (map second cards)))

 (defn filter-by-title
   "Keep only cards that contains the searched string inside their title"
   [title cards]
   (if (empty? title)
     cards
     (filter #(utils/str-contains (-> % second :title) title) cards)))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


  )))

(defn render-column
  [card-renderer status cards]
  [:div.list
   [:h1 status]
   (for [c cards]
     ^{:key (:card-id c)} [card-renderer c])
  ])

(defn render-board
  [card-renderer cards]
  (let [cards-by-status (group-by :status (map second cards))]
    [:div.app
     (for [status [:backlog :under-dev :done]]
       ^{:key status} [render-column card-renderer (status->str status) (cards-by-status status)])
    ]))

(defn render-filter
  [filter-ref]
