summaryrefslogtreecommitdiff
path: root/.config/guix/modules/xdg.scm
blob: 104c215367258ca45ca463c0e7124deb52301435 (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
(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"))))))))
   (simple-service 'dotfiles
                   home-files-service-type
                   `((".Xresources"
                      ,(plain-file "Xresources" "Sxiv.background: #000000
Sxiv.foreground: #00C0FF"))))))