;;; widget/task-list.fnl --- Vertical task list

;;; Code:

(local awful (require :awful))

;;;
;; Functions

(fn task-list [s]
  (awful.widget.tasklist
   s
   awful.widget.tasklist.filter.currenttags
   {}
   {:disable_task_name true}
   ))


task-list
;;; widget/task-list.fnl ends here