blob: ef018b4a8e13f4063b1831305f81d71b04273fda (
about) (
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
|
;; 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.
(define-module (home)
#:use-module (guix gexp)
#:use-module (gnu)
#:use-module (gnu packages)
#:use-module (gnu packages gnupg)
#:use-module (gnu home)
#:use-module (gnu home services)
#:use-module (gnu home services dotfiles)
#:use-module (gnu home services shells)
#:use-module (gnu home services desktop)
#:use-module (gnu home services gnupg)
#:export (home))
(define thanos/dotfiles-path
(format #f "~a/dotfiles" (getenv "HOME")))
(define thanos/emacs-packages
(list "emacs-pgtk" "emacs-nov-el" "emacs-pdf-tools"
"emacs-elpy" "emacs-geiser" "emacs-geiser-guile"
"emacs-vterm" "emacs-jabber" "emacs-yeetube"))
(home-environment
;; Below is the list of packages that will show up in your
;; Home profile, under ~/.guix-home/profile.
(packages (specifications->packages
(append (list "anki" "torbrowser" "mu" "perl" "tree" "iptables"
"hyfetch" "font-iosevka-aile" "font-jetbrains-mono"
"syncthing" "ungoogled-chromium" "transmission" "isync"
"mpv" "yt-dlp" "librewolf" "dino" "0ad" "git" "torbrowser"
"fuzzel" "wl-clipboard" "alacritty" "wtype" "password-store"
"curl" "bind" "nmap" "hunspell" "guile-syntax-highlight" "sbcl"
"hunspell-dict-en-us" "mlocate" "rsync" "grimshot" "nyxt" "haunt"
"texlive" "texlive-cbfonts" "network-manager-applet" "swayidle"
"wl-clipboard" "btop" "hugo-bin" "net-tools" "gnupg")
thanos/emacs-packages)))
;; 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 '(("ga" . "git add")
("gaa" . "git add .")
("gc" . "git commit -m")
("gp" . "git push -u origin")
("gpm" . "git push -u origin master")
("grep" . "grep --color=auto")
("gs" . "git status")
("klight" . "brightnessctl --device='\\''tpacpi::kbd_backlight'\\'' set 1")
("ll" . "ls -lah --color")
("logout" . "pkill -U $USER")
("ls" . "ls --color")
("o" . "emacsclient -n")
("weather" . "curl wttr.in")
("ytd" . "yt-dlp")
("gx" . "guix")))
(bashrc (list (local-file (format #f "~a/bash-prompt.sh" thanos/dotfiles-path)
#:recursive? #f)))))
(service home-dotfiles-service-type
(home-dotfiles-configuration
(directories (list thanos/dotfiles-path))
(excluded '(".*~" ".*\\.swp" "\\.git" "\\.gitignore"
"vimium-options.json" "README" "LICENSE" ".*\\.scm" "__pycache__"
"bash-prompt.sh"))
(layout 'plain)))
;; Env variables
(simple-service 'profile-service-type
home-environment-variables-service-type
'(("VISUAL" . "emacsclient")
("EDITOR" . "emacsclient")
("GTK_THEME" . "Adwaita-dark")
("XDG_CURRENT_DESKTOP" . "sway")
("XDG_SESSION_TYPE" . "wayland")
("BROWSER" . "icecat")
("XDG_SCREENSHOTS_DIR" . "/home/$USER/Pictures/screenshots/")
("PATH" . "/home/$USER/.local/bin:$PATH")))
;; GPG Configuration
(service home-gpg-agent-service-type
(home-gpg-agent-configuration
(pinentry-program
(file-append pinentry-gtk2 "/bin/pinentry-gtk-2"))
(ssh-support? #t)
(default-cache-ttl 28800)
(max-cache-ttl 28800)
(default-cache-ttl-ssh 28800)
(max-cache-ttl-ssh 28800))))))
|