This commit is contained in:
Daniel Ziltener 2023-12-11 11:59:44 +01:00
parent dd8f52be9d
commit d83d855355
Signed by: zilti
GPG key ID: B38976E82C9DAE42
7 changed files with 177 additions and 111 deletions

View file

@ -96,6 +96,7 @@ As a sibling to the former, the variable ~%local-swap~ does the same with the sw
- emacs-desktop-environment
- font-terminus
- git
- hwdata
- nss-certs
- readline
- swayfx
@ -114,11 +115,7 @@ As a sibling to the former, the variable ~%local-swap~ does the same with the sw
#+begin_src scheme :noweb yes :exports none :results code
(services
(append
(modify-services
%desktop-services
(delete login-service-type)
(delete mingetty-service-type)
(delete console-font-service-type))
<<root-modified-desktop-services>>
<<root-simple-service-block>>
(list
<<greeter-service>>)
@ -148,6 +145,29 @@ These services are unmodified, or have just few settings.
<<service-converter(input=root-simple-services)>>
#+end_src
*** Modified Desktop Services
#+NAME: root-modified-desktop-services
#+begin_src scheme :exports none :results code
(modify-services
%desktop-services
(delete login-service-type)
(delete mingetty-service-type)
(delete console-font-service-type)
(guix-service-type config => (guix-configuration
(inherit config)
(substitute-urls
(append (list "https://substitutes.nonguix.org")
%default-substitute-urls))
(authorized-keys
(append (list (plain-file "non-guix.pub"
"(public-key
(ecc
(curve Ed25519)
(q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#)))
")))))))
#+end_src
*** Greeter Service
=greetd= is a broken mess, yet here we are.

View file

@ -16,7 +16,7 @@
;; [[file:config.org::*Modules][Modules:1]]
(use-modules (gnu) (gnu image) (gnu services authentication) (gnu services base) (gnu services dbus) (gnu services desktop) (gnu services linux) (gnu services networking) (gnu services pm) (gnu services virtualization) (gnu services xorg) (gnu system nss))
nil
;; Modules:1 ends here
;; Service Modules
@ -27,7 +27,7 @@
;; [[file:config.org::*Service Modules][Service Modules:1]]
(use-service-modules desktop xorg)
nil
;; Service Modules:1 ends here
;; Package Modules
@ -46,7 +46,7 @@
;; [[file:config.org::*Package Modules][Package Modules:1]]
(use-package-modules bootloaders certs emacs emacs-xyz fonts readline terminals version-control wm xorg)
nil
;; Package Modules:1 ends here
;; File System
@ -115,7 +115,7 @@
%base-user-accounts))
(packages
(append
(list emacs emacs-desktop-environment font-terminus git nss-certs readline swayfx)
nil
%base-packages))
(services
(append
@ -123,8 +123,20 @@
%desktop-services
(delete login-service-type)
(delete mingetty-service-type)
(delete console-font-service-type))
(list (service tlp-service-type (tlp-configuration)) (service thermald-service-type (thermald-configuration (adaptive? #t))) (service bluetooth-service-type (bluetooth-configuration)) (service earlyoom-service-type (earlyoom-configuration (minimum-available-memory 5) (minimum-free-swap 5))) (service inputattach-service-type (inputattach-configuration)) (service libvirt-service-type (libvirt-configuration (unix-sock-group "libvirt"))) (service fstrim-service-type (fstrim-configuration)) (service fprintd-service-type (fprintd-configuration)))
(delete console-font-service-type)
(guix-service-type config => (guix-configuration
(inherit config)
(substitute-urls
(append (list "https://substitutes.nonguix.org")
%default-substitute-urls))
(authorized-keys
(append (list (plain-file "non-guix.pub"
"(public-key
(ecc
(curve Ed25519)
(q #C1FD53E5D4CE971933EC50C9F307AE2171A2D3B52C804642A7A35F84F3A4EA98#)))
")))))))
nil
(list
(service greetd-service-type
(greetd-configuration
@ -141,11 +153,11 @@
(greetd-terminal-configuration
(terminal-vt "4"))
#;(greetd-terminal-configuration
(terminal-vt "7") ; ; ;
(terminal-switch #t) ; ; ;
(default-session-command ; ; ;
(greetd-wlgreet-session ; ; ;
(command ; ; ;
(terminal-vt "7")
(terminal-switch #t)
(default-session-command
(greetd-wlgreet-session
(command
(file-append swayfx "/bin/sway")))))
(greetd-terminal-configuration
(terminal-vt "8")))))))

View file

@ -45,6 +45,41 @@ org-mode
n p n
"#+end_src")
(advent-of-code-day
"* Day " (s day) ": " p
n> n> "Get the puzzle solution as [[./day" day ".scm][tangled .scm file]]."
n> n> "** Part One"
n> n> "#+NAME: day" day "-imports"
n> "#+begin_src scheme :exports none :noweb yes :tangle day" day ".scm"
n>
n> "#+end_src"
n> n> "#+NAME: day" day "-input-scm"
n> "#+begin_src scheme :exports none :noweb yes :tangle day" day ".scm"
n> "(define input \""
n> "<<day" day "-input>>\")"
n> "#+end_src"
n> n> "*** Quest"
n> n> "*** Puzzle Solution"
n> n> "**** Calculation"
n> n> "#+NAME: day" day "-part1-calc-fn"
n> "#+begin_src scheme :tangle day" day ".scm :noweb strip-tangle"
n> ""
n> "#+end_src"
n> n> "#+CALL: day" day "-part1-calc-fn[:var input=day" day "-input[] :epilogue \"(calc-part-1)\"]()"
n> n> "** Part Two"
n> n> "*** Quest"
n> n> "*** Puzzle Solution"
n> n> "**** Calculation"
n> n> "#+NAME: day" day "-part2-calc-fn"
n> "#+begin_src scheme :tangle day" day ".scm :noweb strip-tangle"
n> ""
n> "#+end_src"
n>n> "#+CALL: day" day "-part2-calc-fn[:var input=day" day "-input[] :epilogue \"(calc-part-2)\"]()"
n> n> "** Puzzle Input"
n> n> "#+NAME: day" day "-input"
n> "#+begin_src fundamental"
n> "#+end_src")
;; Local Variables:
;; mode: lisp-data
;; outline-regexp: "[a-z]"

View file

@ -1,36 +0,0 @@
# Das ist Git's benutzerspezifische Konfigurationsdatei.
[user]
# Bitte passen Sie die folgenden Zeilen an und kommentieren Sie diese aus:
name = Daniel Ziltener
email = dziltener@lyrion.ch
signingkey = 37F655BAF43BC0FF300A91A1B38976E82C9DAE42
[sendemail]
smtpserver = lyrion.ch
smtpuser = dziltener
smtpencryption = starttls
smtpserverport = 465
[rebase]
autoStash = true
[pull]
rebase = true
[gui]
recentrepo = /home/zilti/projects/crawler-vacancies
[gitlab]
user = zilti
oauth-token = zA4CYqcCcV5oN7N-2Qsn
[cola]
spellcheck = false
[init]
defaultBranch = master
[safe]
directory = /home/zilti/.local/share/hyprload/hyprland
directory = /opt/nixconfig/
directory = /opt/nixconfig
[github]
user = dziltener@lyrion.ch
[commit]
gpgsign = true

View file

@ -11,7 +11,7 @@
useUnicodeRuler = true
[gpg]
program = "gpg2"
program = "gpg"
[interactive]
diffFilter = "diff-so-fancy --patch"
@ -26,10 +26,10 @@
autoStash = true
[sendemail]
smtpencryption = "starttls"
smtpserver = "lyrion.ch"
smtpserverport = 465
smtpuser = "dziltener"
smtpEncryption = "tls"
smtpServer = "lyrion.ch"
smtpServerPort = 465
smtpUser = "dziltener"
[sendemail "LMail"]
from = "dziltener@lyrion.ch"
@ -51,3 +51,13 @@
email = "dziltener@lyrion.ch"
name = "Daniel Ziltener"
signingKey = "37F655BAF43BC0FF300A91A1B38976E82C9DAE42"
[init]
defaultBranch = master
[github]
user = dziltener@lyrion.ch
[gitlab]
user = zilti
oauth-token = zA4CYqcCcV5oN7N-2Qsn

View file

@ -29,7 +29,11 @@
(packages
(specifications->packages
(list "bsd-games"
"bolt"
"chicken"
"chicken-apropos"
"chicken-chicken-doc"
"chicken-srfi-18"
"curl"
"direnv"
"emacs"
@ -38,6 +42,7 @@
"firefox"
"fuzzel"
"gammastep"
"grim"
"guile"
"glibc-locales"
"icecat"
@ -53,18 +58,21 @@
"rust"
"rust-cargo"
"senpai"
"slurp"
"swappy"
"swayfx"
"swayidle"
"swaylock-effects"
"waybar"
"wlogout")))
;; Below is the list of Home services. To search for available
;; services, run 'guix home search KEYWORD' in a terminal.
(
services
(services
(list
(service home-shepherd-service-type)
(service home-msmtp-service-type
(home-msmtp-configuration
(default-account "LMail")
(accounts
(list
(msmtp-account
@ -72,8 +80,12 @@ services
(configuration
(msmtp-configuration
(host "lyrion.ch")
(port 587)
(port 465)
(auth? #t)
(tls? #t)
(tls-starttls? #f)
(user "dziltener")
(from "dziltener@lyrion.ch")
(password-eval "pass Privat/Mailaccount | head -n 1"))))
(msmtp-account
(name "Red Sky")
@ -81,7 +93,11 @@ services
(msmtp-configuration
(host "gmail.com")
(port 587)
(auth? #t)
(tls? #t)
(tls-starttls? #f)
(user "dz@redsky.io")
(from "dziltener@lyrion.ch")
(password-eval "pass Privat/RedSkyGMail"))))))))
(simple-service 'ziltis-environment-variable-service
home-environment-variables-service-type
@ -93,9 +109,10 @@ services
("MOZ_ENABLE_WAYLAND" . "1")
("SSL_CERT_FILE" . "$HOME/.guix-profile/etc/ssl/certs/ca-certificates.crt")
("CHICKEN_DOC_REPOSITORY" . "$XDG_DATA_HOME/chicken/doc")
("CHICKEN_INSTALL_REPOSITORY" . "$XDG_DATA_HOME/chicken/eggs")
("CHICKEN_REPOSITORY_PATH" . "$HOME/.guix-home/profile/var/lib/chicken/11/:$XDG_DATA_HOME/chicken/eggs")
("CHICKEN_INSTALL_PREFIX" . "$HOME/.local")))
;; ("CHICKEN_INSTALL_REPOSITORY" . "$XDG_DATA_HOME/chicken/eggs")
;; ("CHICKEN_REPOSITORY_PATH" . "$HOME/.guix-home/profile/var/lib/chicken/11/:$XDG_DATA_HOME/chicken/eggs")
;; ("CHICKEN_INSTALL_PREFIX" . "$HOME/.local")
))
(simple-service 'ziltis-home-files-service
home-files-service-type
`(#;(".gnupg/gpg-agent.conf" ,(local-file "gnupg/gpg-agent.conf"))))
@ -117,7 +134,9 @@ services
'(("hh" . "hstr")
("l" . "ls -alh")
("ll" . "ls -l")
("ls" . "ls --color=tty")))
("ls" . "ls --color=tty")
("create-guix-patch" . "git format-patch --to guix-patches@gnu.org --cc dziltener@lyrion.ch --inline --no-attach --stdout master")
("send-create-guix-patch" . "git format-patch --to guix-patches@gnu.org --cc dziltener@lyrion.ch --inline --no-attach --stdout master | tail -n +2 | msmtp -t")))
(bashrc
(list
(local-file

View file

@ -32,11 +32,11 @@ default_border pixel 2
# window gaps
smart_gaps inverse_outer
gaps inner 15
gaps left 700
gaps right 700
gaps left 500
gaps right 500
bindsym $mod+g gaps outer all set 0
bindsym $mod+i gaps left all set 700; gaps right all set 700
bindsym $mod+i gaps left all set 500; gaps right all set 500
# window corner radius in px
corner_radius 10
@ -117,6 +117,12 @@ input * {
bindsym $mod+r exec swaymsg "focus parent; split h; exec fuzzel"
bindsym $mod+Shift+r exec swaymsg "focus parent; split v; exec fuzzel"
# Screen locking
bindsym $mod+ctrl+l exec swaylock
# Screenshots
bindsym $mod+Print exec grim -g slurp - | swappy -f -
# Drag floating windows by holding down $mod and left mouse button.
# Resize them with right mouse button + $mod.
# Despite the name, also works for non-floating windows.
@ -269,8 +275,8 @@ mode "resize" {
#}
# Autostarts
exec pipewire & sleep 0.2s && pipewire-pulse & wireplumber &
exec shepherd
exec waybar
exec kitty && sleep 0.2s
exec swaymsg move scratchpad
include @sysconfdir@/sway/config.d/*