blob: 0b1b8f15f5f78724fdd2c937f2f30274d8afd0b0 (
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
|
(define-module (xdg)
#:use-module (guix gexp)
#:use-module (gnu services)
#:use-module (gnu home services)
#:use-module (xdg)
#:use-module (gnu home services xdg))
(define-public xdg-service
(list
(service home-xdg-user-directories-service-type
(home-xdg-user-directories-configuration
(desktop "$HOME")
(documents "$HOME")
(download "$HOME/dl")
(music "$HOME/media")
(pictures "$HOME/media")
(publicshare "$HOME")
(templates "$HOME")
(videos "$HOME/media")))
(service home-xdg-mime-applications-service-type
(home-xdg-mime-applications-configuration
(default
'((application/x-bittorrent . torrent.desktop)
(x-scheme-handler/magnet . torrent.desktop)))
(desktop-entries
(list
(xdg-desktop-entry
(file "torrent")
(name "Torrent")
(type 'application)
(config '((exec . "transmission-remote -a %u"))))))))))
|
