~ruther/guix-config

ref: 3cc99e73287675192873fc694138ee1b299c6c46 guix-config/home/home-configuration.scm -rw-r--r-- 4.6 KiB
3cc99e73 — Rutherther fix: makefile should use only locked channels 7 months ago
                                                                                
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
;; This "home-environment" file can be passed to 'guix home reconfigure'
;; to reproduce the content of your profile.  This is "symbolic": it only
;; specifies package names.  To reproduce the exact same profile, you also
;; need to capture the channels being used, as returned by "guix describe".
;; See the "Replicating Guix" section in the manual.

(use-modules (gnu home)
             (gnu packages)
             (gnu packages gnupg)
             (gnu packages shellutils)
             (gnu services)
             (guix gexp)
             (gnu home services fontutils)
             (gnu home services desktop)
             (gnu home services shells)
             (gnu home services gnupg)
             (gnu home services sound)
             (gnu home services)
             (ruther home dwl wm))

(home-environment
 ;; Below is the list of packages that will show up in your
 ;; Home profile, under ~/.guix-home/profile.
 (packages
  (append
   (list
    dwl-mine)
   (specifications->packages
    (list
     ;; HW interactions
     "blueman" "pavucontrol"
     "network-manager-applet"

     ;; Terminals, utilities
     "foot" "fbset"

     ;; Shell utilities
     "ripgrep-all" "ripgrep"
     "fd" "fzf"

     ;; Fonts
     "font-hack" "font-dejavu"
     "font-ubuntu"
     "font-awesome" "font-google-noto-emoji"

     ;; Browsing
     "librewolf"
     "firefox" ;; No netflix in librewolf :'(

     ;; Development
     "git" "openssh"

     ;; Passwords
     "gnupg" "password-store-wl" "pass-otp"

     ;; DBus services
     "mako"

     ;; My favorite wm
     ;; "dwl-mine"

     ;; Notebook stuff
     "acpi" "xbacklight"
     "brillo"

     ;; Editing
     "emacs" "emacs-vterm"
     "neovim"))))

  ;; Below is the list of Home services.  To search for available
  ;; services, run 'guix home search KEYWORD' in a terminal.
  (services
   (list (service home-bash-service-type
                  (home-bash-configuration
                   (guix-defaults? #t)
                   (aliases '(("grep" . "grep --color=auto")
                              ("ip" . "ip -color=auto")
                              ("ll" . "ls -l")
                              ("ls" . "ls -p --color=auto")))
                   (bashrc (list (local-file "dotfiles/.bashrc" "bashrc")))
                   (bash-profile (list (local-file "dotfiles/.bash_profile"
                                                   "bash_profile")))))

         (service home-zsh-service-type
                  (home-zsh-configuration
                   (zshrc (list
                           (local-file "dotfiles/.zshrc" "zshrc")))))

         (service home-files-service-type
                  `((".config/foot/foot.ini" ,(local-file "dotfiles/foot.ini"))
                    (".config/waybar/config.jsonc" ,(local-file "dotfiles/waybar/config.jsonc"))
                    (".config/waybar/style.css" ,(local-file "dotfiles/waybar/style.css"))
                    (".config/mako/config" ,(local-file "dotfiles/mako"))
                    (".config/mimeapps.list" ,(local-file "dotfiles/mimeapps.list"))

                    (".config/dwl/scripts/print.sh" ,(local-file "dotfiles/dwl/print.sh"))

                    (".config/zsh/plugins" ,#~(string-append #$(directory-union
                                                                "zsh-plugins"
                                                                (list zsh-autosuggestions zsh-syntax-highlighting))
                                                             "/share/zsh/plugins"))

                    (".librewolf/native-messaging-hosts/com.github.browserpass.native.json"
                     ,(file-append
                       (specification->package "browserpass-native")
                       "/lib/browserpass/hosts/firefox/com.github.browserpass.native.json"))))

         (simple-service 'default-fonts
                         home-fontconfig-service-type
                         (list
                          '(alias
                            (family "monospace")
                            (prefer (family "Ubuntu Mono")))
                          '(alias
                            (family "sansSerif")
                            (prefer (family "Ubuntu")))
                          '(alias
                            (family "serif")
                            (prefer (family "Ubuntu")))))

         (service home-gpg-agent-service-type
                  (home-gpg-agent-configuration
                   (pinentry-program
                    (file-append pinentry-gtk2 "/bin/pinentry-gtk-2"))))
         (service home-pipewire-service-type)
         (service home-dbus-service-type))))
Do not follow this link