.config/guix-builds/bdunahu.scm


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

;; add this directory to the load path.
(add-to-load-path (dirname (current-filename)))

(use-modules (host-instance)
             (gnu home)
             (gnu packages)
             (gnu packages gnupg)
             (gnu services)
             (guix gexp)
             (gnu home services shepherd)
             (gnu home services xdg)
             (gnu home services shells)
             (gnu home services gnupg)
             (gnu home services desktop)
             (gnu home services pm)
             (gnu home services ssh))

(home-environment
 ;; List of packages that will show up
 ;; under ~/.guix-home/profile.
 (packages (specifications->packages (list "aspell"
                                           "aspell-dict-en"
                                           ;; "dmenu"
                                           "emacs-all-the-icons"
                                           "emacs-auctex"
                                           "emacs-company"
                                           "emacs-ednc"
                                           "emacs-emms"
                                           "emacs-exwm"
                                           "emacs-guix"
                                           "emacs-magit"
                                           "emacs-org-roam"
                                           "emacs-pinentry"
                                           "emacs-slime"
                                           "emacs-vertico"
                                           "feh"
                                           "flameshot"
                                           "gimp"
                                           "gnupg"
                                           "icecat"
                                           "libnotify"
                                           ;; "mpc"
                                           ;; "mpv"
                                           "password-store"
                                           "pass-otp"
                                           "pinentry-emacs"
                                           "rsync"
                                           "sbcl"
                                           "stow"
                                           ;; "texlive"
                                           "xset"
                                           "yt-dlp"
                                           "zathura"
                                           "zathura-pdf-poppler")))

 ;; Below is the list of Home services.  To search for available
 ;; services, run 'guix home search KEYWORD' in a terminal.
 (services
  (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-bash-service-type
                 (home-bash-configuration
                  (aliases '(("cp" . "cp -i")
                             ("grep" . "grep --color=auto")
                             ("ll" . "ls -l")
                             ("ls" . "ls -p --color=auto")
                             ("mkd" . "mkdir -pv")
                             ("mv" . "mv -i")
                             ("rm" . "rm -i")
                             ("vi" . "vim")
                             ("ytta" . "yt-dlp --extract-audio --format bestaudio/best")
                             ("yttv" . "yt-dlp -f b")))
                  (bashrc (list (local-file
                                 "/home/bdunahu/.config/guix-builds//.bashrc"
                                 "bashrc")))))
        (service home-openssh-service-type
                 (home-openssh-configuration
                  (hosts
                   (list (openssh-host (name "hati")
                                       (host-name "192.168.1.68")
                                       (user "bdunahu"))
                         (openssh-host (name "vali")
                                       (host-name "192.168.1.64")
                                       (user "bdunahu"))
                         (openssh-host (name "perch")
                                       (host-name "perch.cs.colostate.edu")
                                       (user "bdunahu"))))))
        (service home-gpg-agent-service-type
                 (home-gpg-agent-configuration
                  (pinentry-program
                   (file-append pinentry-emacs "/bin/pinentry-emacs"))
                  (ssh-support? #t)))
        (service home-shepherd-service-type)


        (if (equal? host-name "vali")
            (service home-batsignal-service-type
                     (home-batsignal-configuration
                      (warning-level 35)
                      (critical-level 15)
                      (danger-level 5)))
            (service home-xmodmap-service-type
                     (home-xmodmap-configuration
                      (key-map '(("remove Lock" . "Caps_Lock")
                                 ("remove Control" . "Control_L")
                                 ("keysym Control_L" ."Caps_Lock")
                                 ("keysym Caps_Lock" . "Control_L")
                                 ("add Lock" . "Caps_Lock")
                                 ("add Control" . "Control_L"))))))
        )))