blob: c71767e90d4265cbb271a493ff08caab233553d9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
|
(define-module (modules dwm)
#:use-module (gnu)
#:use-module (gnu home services)
#:use-module (gnu home services desktop)
#:use-module (guix gexp)
#:use-module (guix packages)
#:export (bd-dwm-system-packages
bd-dwm-home-services))
(use-package-modules
image-viewers ;; nsxiv
suckless ;; dwm
xdisorg ;; xdotool
xorg ;; xprop
)
(define bd-dwm
(package
(inherit dwm)
(name "bdunahu-dwm")
(inputs (modify-inputs (package-inputs dwm)))
(source (local-file "dwm" #:recursive? #t))))
(define bd-dwm-system-packages
(list
bd-dwm
nsxiv
xdotool
xprop
))
(define bd-dwm-home-services
(list
(simple-service 'dotfiles
home-files-service-type
`((".Xresources"
,(plain-file "Xresources" "
Nsxiv.window.background: #000000
Nsxiv.window.foreground: #FFFFFF
Nsxiv.bar.font: Terminus:size=9
"))))))
|
