resize and show view on creation
This commit is contained in:
parent
2f32fac349
commit
a1908de8d3
@ -9,7 +9,7 @@
|
|||||||
;(local battery (require :blinkenlicht.metric.battery))
|
;(local battery (require :blinkenlicht.metric.battery))
|
||||||
(local cpustat (require :blinkenlicht.metric.cpustat))
|
(local cpustat (require :blinkenlicht.metric.cpustat))
|
||||||
|
|
||||||
(stylesheet "licht.css")
|
(stylesheet "modeline.css")
|
||||||
|
|
||||||
(fn battery-icon-codepoint [status percent]
|
(fn battery-icon-codepoint [status percent]
|
||||||
(if (= status "Charging") 0xf0e7
|
(if (= status "Charging") 0xf0e7
|
||||||
|
9
rc.fnl
9
rc.fnl
@ -1,4 +1,13 @@
|
|||||||
(kiwmi:on "output" #(doto $1 (: :set_mode 360 720 0)))
|
(kiwmi:on "output" #(doto $1 (: :set_mode 360 720 0)))
|
||||||
|
(kiwmi:on "view"
|
||||||
|
(fn [view]
|
||||||
|
(let [(w h) (: (kiwmi:active_output) :size)]
|
||||||
|
(view:resize w h)
|
||||||
|
(view:move 0 0))
|
||||||
|
(view:focus)
|
||||||
|
(view:show)
|
||||||
|
(view:on "request_move" #(view:imove))
|
||||||
|
(view:on "request_resize" (fn [ev] (view:iresize ev.edges)))))
|
||||||
|
|
||||||
|
|
||||||
;(kiwmi:spawn "swaybg -c '#ff00ff'")
|
;(kiwmi:spawn "swaybg -c '#ff00ff'")
|
||||||
|
Loading…
Reference in New Issue
Block a user