adding a lot of guix things to better setup guix

A lot of these changes are for Guix not Nix, however, nix still works
on the laptop so I'm going to reset the changes on the desktop to this
commit so that Nix might work there for Camp.
This commit is contained in:
Chris Cochrun 2023-07-12 11:18:35 -05:00
parent bad4b948fb
commit fe1e6c695b
87 changed files with 37132 additions and 38 deletions

View file

@ -8,6 +8,8 @@
#:use-module (pkgs emacs-xyz)
#:use-module (pkgs tridactyl-native)
#:use-module (pkgs phinger-cursors-theme)
#:use-module (pkgs qt5ct-kde)
#:use-module (pkgs kdenlive)
#:use-module (home-services pipewire)
#:use-module (gnu home)
#:use-module (gnu home services)
@ -15,11 +17,13 @@
#:use-module (gnu home services shells)
#:use-module (gnu home services xdg)
#:use-module (gnu home services gnupg)
#:use-module (gnu home services fontutils)
#:use-module (gnu packages)
#:use-module (gnu packages vim)
#:use-module (gnu packages rust-apps)
#:use-module (gnu packages video)
#:use-module (gnu packages gnupg)
#:use-module (gnu packages kde)
#:use-module (gnu services)
#:use-module (guix gexp)
#:use-module (guix packages)
@ -27,6 +31,26 @@
#:use-module (guix build-system emacs)
#:use-module ((guix licenses) #:prefix license:))
;; (define snazzy-theme
;; "A set of the Snazzy colors to be used in colorschemes"
;; '((base00 . "#282a36")
;; (base01 . "#34353e")
;; (base02 . "#43454f")
;; (base03 . "#78787e")
;; (base04 . "#a5a5a9")
;; (base05 . "#e2e4e5")
;; (base05 . "#eff0eb")
;; (base06 . "#f1f1f0")
;; (base06 . "#ff5c57")
;; (base09 . "#ff9f43")
;; (base0A . "#f3f99d")
;; (base0B . "#5af78e")
;; (base0C . "#9aedfe")
;; (base0D . "#57c7ff")
;; (base0E . "#ff6ac1")
;; (base0F . "#b2643c")))
(define home-packages
(list "vim"
"exa"
@ -76,7 +100,7 @@
"slurp"
"imv"
"phinger-cursors-theme"
"firefox"
;; "firefox"
"icecat"
"qutebrowser"
"nyxt"
@ -88,8 +112,19 @@
"kdeconnect"
"plasma"
"dolphin"
"ffmpegthumbs"
"ffmpegthumbnailer"
"kio-fuse"
"kio-extras"
"nautilus"
"dconf"
"dconf-editor"
"tracker"
"tracker-miners"
"gvfs"
"kfind"
"ark"
"kdenlive"
"kdenlive-fix"
"gimp"
"mediainfo"
;; "tridactyl-native"
@ -244,8 +279,7 @@
(plain-file "less-color" "export LESS=\"--RAW-CONTROL-CHARS\"")
(plain-file "man-colors" "[[ -f ~/.LESS_TERMCAP ]] && . ~/.LESS_TERMCAP")
(plain-file "starship" "source $HOME/.config/starship/init.sh")
(plain-file "direnv" "eval \"$(direnv hook bash)\"
")))))
(plain-file "direnv" "eval \"$(direnv hook bash)\"")))))
(simple-service 'extra-env-vars
home-environment-variables-service-type
`(("PATH" . "$PATH:/home/chris/bin:/home/chris/.nix-profile/bin")
@ -291,6 +325,7 @@
("btop" ,(local-file "../.config/bpytop" #:recursive? #t))
("mpv" ,(local-file "../.config/mpv" #:recursive? #t))
("blesh" ,(local-file "../.config/blesh" #:recursive? #t))
("imv" ,(local-file "../.config/imv" #:recursive? #t))
("starship" ,(local-file "../.config/starship" #:recursive? #t))
("starship.toml" ,(local-file "../.config/starship.toml"))
("guix/channels.scm" ,(local-file "channels.scm"))
@ -298,6 +333,7 @@
("fish/functions" ,(local-file "../.config/fish/functions" #:recursive? #t))
("qt5ct/colors/snazzy.conf" ,(local-file "../.config/qt5ct/snazzy.conf"))
("alacritty/alacritty.yml" ,(local-file "../.config/alacritty/alacritty.yml"))
("qutebrowser" ,(local-file "../.config/qutebrowser" #:recursive? #t))
("direnv/direnvrc" ,(plain-file "direnvrc" "\
use_guixs() {
eval \"$(guix shell \"$@\" --search-paths)\"
@ -317,8 +353,20 @@ gtk-primary-button-warps-slider=true
gtk-shell-shows-menubar=1
gtk-theme-name=Breeze
gtk-toolbar-style=3
gtk-xft-dpi=98304
"))))
#gtk-xft-dpi=98304
"))
;; ("gtk-3.0/gtk.css" ,(plain-file "gtk.css" "
;; "))
;; ("gtk-3.0/gtk-dark.css" ,(plain-file "gtk-dark.css"
;; "@import url(\"dist/gtk.css\");"))
("gtk-3.0/gtk.css" ,(local-file "../.config/gtk-3.0/gtk.css"))
("gtk-3.0/gtk-dark.css" ,(local-file "../.config/gtk-3.0/gtk-dark.css"))
("gtk-3.0/dist" ,(local-file "../.config/gtk-3.0/dist" #:recursive? #t))
("gtk-3.0/gtk.gresource" ,(local-file "../.config/gtk-3.0/gtk.gresource"))
("gtk-3.0/gtk.gresource.xml" ,(local-file "../.config/gtk-3.0/gtk.gresource.xml"))
("gtk-3.0/assets" ,(local-file "../.config/gtk-3.0/assets" #:recursive? #t))
("gtk-2.0" ,(local-file "../.config/gtk-2.0" #:recursive? #t))))
(simple-service 'scripts
home-files-service-type
`(("bin" ,(local-file "../scripts" #:recursive? #t))
@ -340,6 +388,14 @@ Inherits=phinger-cursors-light
(default-cache-ttl-ssh 28800)
(max-cache-ttl-ssh 28800)))
(simple-service 'additional-fonts-service
home-fontconfig-service-type
(list "~/.nix-profile/share/fonts"
'(alias
(family "monospace")
(prefer
(family "Liberation Mono")))))
(service home-xdg-user-directories-service-type
(home-xdg-user-directories-configuration
(videos "$HOME/vids")
@ -373,10 +429,10 @@ Inherits=phinger-cursors-light
("application/x-extension-xhtml" . "firefox.desktop")
("application/xhtml+xml" . "firefox.desktop")
("inode/directory" . "dolphin.desktop")
("image/gif" . "imv.desktop")
("image/jpeg" . "imv.desktop")
("image/heif" . "imv.desktop")
("image/png" . "imv.desktop")
("image/gif" . "imv-rifle.desktop")
("image/jpeg" . "imv-rifle.desktop")
("image/heif" . "imv-rifle.desktop")
("image/png" . "imv-rifle.desktop")
("audio/vorbis" . "mpv-slow.desktop")
("audio/mp3" . "mpv-slow.desktop")
("audio/flac" . "mpv-slow.desktop")
@ -402,10 +458,10 @@ Inherits=phinger-cursors-light
("application/x-extension-xht" . "firefox.desktop")
("application/x-extension-xhtml" . "firefox.desktop")
("application/xhtml+xml" . "firefox.desktop")
("image/gif" . "imv.desktop")
("image/jpeg" . "imv.desktop")
("image/heif" . "imv.desktop")
("image/png" . "imv.desktop")
("image/gif" . "imv-rifle.desktop")
("image/jpeg" . "imv-rifle.desktop")
("image/heif" . "imv-rifle.desktop")
("image/png" . "imv-rifle.desktop")
("audio/vorbis" . "mpv-slow.desktop")
("audio/mp3" . "mpv-slow.desktop")
("audio/flac" . "mpv-slow.desktop")
@ -417,6 +473,12 @@ Inherits=phinger-cursors-light
(name "MPV for Audio and Streams")
(type 'application)
(config
'((exec . "mpv --profile=slow %U"))))))))
'((exec . "mpv --profile=slow %U"))))
(xdg-desktop-entry
(file "imv-rifle")
(name "IMV rifling all files")
(type 'application)
(config
'((exec . "rifle-imv %U"))))))))
(service home-pipewire-service-type)
(service home-dbus-service-type))))