summaryrefslogtreecommitdiff
path: root/home/config.scm
blob: dd9a6cf3d998a7fe6d2c62ba1c79603f4f2a0598 (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
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
;; This is a sample Guix Home configuration which can help setup your
;; home directory in the same declarative manner as Guix System.
;; For more information, see the Home Configuration section of the manual.
(define-module (guix-home-config)
  #:use-module (gnu home)
  #:use-module (gnu home services)
  #:use-module (gnu home services shells)
  #:use-module (gnu services)
  #:use-module (gnu packages)  
  #:use-module (gnu packages admin)
  #:use-module (gnu packages emacs)
  #:use-module (gnu packages fonts)
  #:use-module (gnu packages mail)
  #:use-module (gnu packages rust-apps)
  #:use-module (gnu packages search)
  #:use-module (gnu packages imagemagick)
  #:use-module (gnu packages password-utils)
  #:use-module (gnu packages image-viewers)
  #:use-module (gnu packages xfce)      
  #:use-module (gnu packages sync)
  #:use-module (gnu packages xorg)
  #:use-module (gnu packages xdisorg)
  #:use-module (gnu packages gnome)
  #:use-module (gnu packages librewolf)
  #:use-module (gnu packages emacs-xyz)
  #:use-module (gnu packages text-editors)
  #:use-module (gnu packages golang)      
  #:use-module (gnu packages gnupg)
  #:use-module (gnu packages aspell)
  #:use-module (gnu packages sqlite)
  #:use-module (gnu packages gcc)
  #:use-module (gnu packages commencement)  
  #:use-module (gnu packages base)
  #:use-module (gnu packages golang-crypto)  
  #:use-module (gnu packages linux)
  #:use-module (gnu packages image)
  #:use-module (gnu packages xdisorg)    
  #:use-module (nongnu packages mozilla)  
  #:use-module (gnu packages databases)
  #:use-module (gnu packages compression)        
  #:use-module (gnu system shadow)
  #:use-module (gnu home services fontutils)
  #:use-module (gnu home services dotfiles)
  #:use-module (gnu home services gnupg)
  #:use-module (gnu home services desktop)
  #:use-module (gnu packages ssh)
  #:use-module (gnu packages pdf)
  #:use-module (gnu packages texinfo)
  #:use-module (gnu packages man)      
  #:use-module (guix gexp)
  #:use-module (guix packages)
  #:use-module (guix download)
  #:use-module (guix build-system go)          
  #:use-module (gnu home services pm))


(define home-config
  (home-environment
   (packages (list
	      font-iosevka
	      font-iosevka-aile
	      font-iosevka-etoile
	      font-liberation
	      
	      isync

	      zoxide
	      ugrep
	      imagemagick
	      password-store
	      fd
	      recutils
	      unzip
	      inxi
	      alsa-utils

	      texinfo
	      man-db
	      man-pages
	      mandoc


	      go
	      binutils
	      sqlite
	      gcc-toolchain

	      mg

	      imv
	      thunar
	      thunar-volman

	      emacs-geiser	      
	      emacs-geiser-guile
	      emacs-pinentry
	      emacs-pdf-tools
	      emacs-alsamixer-el
	      mu
	      msmtp
	      emacs
	      aspell
	      aspell-dict-en

              xf86-input-libinput
	      xf86-video-fbdev
	      xf86-video-nouveau

	      gnupg
	      age
	      pinentry
	      openssh

	      firefox

	      xsetroot
	      scrot
	      imlib2 ;; Needed for scrot
	      xset
	      xrdb
	      brightnessctl
	      autocutsel
	      gsettings-desktop-schemas
	      setxkbmap))
   (services
    (list
     (service home-bash-service-type
	      (home-bash-configuration
	       (guix-defaults? #f)
	       (bash-profile (list (local-file "./profile")))
	       (bashrc (list (local-file "./bashrc")))))

     (service home-startx-command-service-type)
     (service home-xmodmap-service-type
                   (home-xmodmap-configuration
                    (key-map '(("remove Lock" . "Caps_Lock")
                               ("keysym Caps_Lock" . "Control_L")))))

     (service home-gpg-agent-service-type
              (home-gpg-agent-configuration
               (pinentry-program
                (file-append pinentry-emacs "/bin/pinentry-emacs"))
               (ssh-support? #t)
	       (max-cache-ttl 99999)
	       (default-cache-ttl 99999)))

	       
     (service home-files-service-type
              `((".guile" ,%default-dotguile)
		(".Xdefaults" ,%default-xdefaults)))

     (service home-dotfiles-service-type
	      (home-dotfiles-configuration
	       (directories '("./dots"))))

     (simple-service 'extend-home
      home-environment-variables-service-type
      `(("PATH" . "${PATH}:~/home/go/bin")))

     (service home-xdg-configuration-files-service-type
              `(("gdb/gdbinit" ,%default-gdbinit)))))))

home-config