feat(sidebar): add task list

This commit is contained in:
xeals 2019-01-15 21:33:41 +11:00
parent d7186976a8
commit 80cc22804b
2 changed files with 6 additions and 3 deletions

View File

@ -49,9 +49,9 @@
(: s.sb :setup (: s.sb :setup
{:layout wibox.layout.align.vertical {:layout wibox.layout.align.vertical
1 {1 (border (tag-list s)) 1 {1 (border (tag-list s))
;; 2 (task-list s)
:layout wibox.layout.fixed.vertical} :layout wibox.layout.fixed.vertical}
2 nil 2 {1 (border (center (task-list s)) 4)
:layout wibox.layout.flex.vertical}
3 {1 (center systray) 3 {1 (center systray)
2 (center battery.widget) 2 (center battery.widget)
3 {1 (border 3 {1 (border

View File

@ -3,6 +3,7 @@
;;; Code: ;;; Code:
(local awful (require :awful)) (local awful (require :awful))
(local wibox (require :wibox))
;;; ;;;
;; Functions ;; Functions
@ -10,9 +11,11 @@
(fn task-list [s] (fn task-list [s]
(awful.widget.tasklist (awful.widget.tasklist
s s
awful.widget.tasklist.filter.currenttags awful.widget.tasklist.filter.minimizedcurrenttags
{} {}
{:disable_task_name true} {:disable_task_name true}
awful.widget.common.list_update
(wibox.layout.fixed.vertical)
)) ))