   [(create-card
      "1st card"
      "This is my first description"
+     :bug-fix
      :backlog
      (create-task "Done some stuff" true))
    (create-card
      "2nd card"
      "This is my second description"
+     :enhancement
      :under-dev
      (create-task "Done some stuff" true)
      (create-task "Done some more stuff" false))
    (create-card
      "3nd card"
      "This is my third description"
+     :bug-fix
      :under-dev)
    (create-card
      "4th card"
      "This is my fourth description"
+     :enhancement
      :done)])
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

    :done "Done"
    :else "Unknown"))

(defn filter-by-status
  [status cards]
  (filter #(= status (:status %)) cards))


(defn create-card
  "Create a card to display in the dash-board"
  [title description category status & tasks]
  {:title title
   :description description
   :category category
   :status status
   :tasks (into [] tasks)})

