feat: atkinson hyperlegible next

This commit is contained in:
Kat Inskip 2026-02-05 10:07:14 -08:00
parent 1cbce535ea
commit fcab621864
6 changed files with 97 additions and 9 deletions

View file

@ -5,8 +5,8 @@
(add-hook 'emacs-lisp-mode-hook 'evil-paredit-mode)
;; scheme paredit
(add-hook 'scheme 'enable-paredit-mode)
(add-hook 'scheme 'evil-paredit-mode)
(add-hook 'scheme-mode-hook 'enable-paredit-mode)
(add-hook 'scheme-mode-hook 'evil-paredit-mode)
;; geiser
(add-hook 'geiser-mode-hook 'ac-geiser-setup)
@ -18,5 +18,7 @@
(menu-bar-mode -1)
(tool-bar-mode -1)
(scroll-bar-mode -1)
(add-to-list 'default-frame-alist '(alpha-background . 90))
(set-frame-font "Atkinson Hyperlegible Next 10" nil t)

View file

@ -1,2 +1,5 @@
[main]
font=Atkinson Hyperlegible Next:size=10
[colors]
alpha=0.9

View file

@ -4,7 +4,7 @@ icons_format = "{icon}"
theme = "native"
[icons]
icons = "none"
icons = "awesome4"
[icons.overrides]
bat = ["|E|", "|_|", "|=|", "|F|"]
bat_charging = "|^| "

1
files/starship.fish Normal file
View file

@ -0,0 +1 @@
starship init fish | source

View file

@ -6,7 +6,10 @@
(gnu home services dotfiles)
(gnu home services shells)
(gnu home services sway)
(gnu home services desktop)
(gnu home services sound)
(packages nvim)
(packages fonts)
(gnu system keyboard)
(gnu services)
(gnu system shadow))
@ -19,8 +22,12 @@
vim ; self-explanatory
librewolf ; self-explanatory
lua ; fennel
video ; mpv, yt-dlp
terminals ; foot
admin ; fastfetch
pulseaudio ; pavucontrol
fonts ; cozette
shellutils ; starship
)
(define neovim-packages
@ -46,16 +53,60 @@
(define sway-config
(sway-configuration
(inherit %empty-sway-configuration)
(inherit %empty-sway-configuration)
(bar (sway-bar
(identifier 'bar0)
(position 'top)
(colors (sway-color (background "$dark")
(statusline "$light")
(focused-workspace
(sway-border-color (border "$gray")
(background "$gray")
(text "$light")))
(active-workspace
(sway-border-color (border "$mid")
(background "$mid")
(text "$light")))
(inactive-workspace
(sway-border-color (border "$inactive")
(background "$inactive")
(text "$light")))
(urgent-workspace
(sway-border-color (border "$urgent")
(background "$urgent")
(text "$light")))))
(status-command sway-bar-status)))
;;(startup+reload-programs TODO)
;;(extra-content TODO)
(variables %sway-default-variables)
(extra-content (list
"client.focused $focused $focused $light $focused $focused"
"client.focused_inactive $inactive $inactive $light $inactive $inactive"
"client.unfocused $unfocused $unfocused $light $unfocused $unfocused"
"client.urgent $urgent $urgent $light $urgent $urgent"
"smart_gaps on"
"gaps inner 0"
"gaps outer -4"
"gaps top -2"
"gaps bottom 0"
"default_border pixel 0"
"default_floating_border pixel 2"
"font pango:Atkinson Hyperlegible Next 10"
))
(variables (append `((mod . "Mod4")
(light . "#ebdbb2")
(dark . "#3c3836")
(gray . "#928374")
(mid . "#665c54")
(focused . "#3c3836")
(inactive . "#282828")
(unfocused . "#282828")
(urgent . "#b8bb26")
) %sway-default-variables))
(keybindings %sway-default-keybindings)
(gestures %sway-default-gestures)
(outputs
(list (sway-output
(identifier '*)
(background (local-file "files/homu-wallpaper.jpg")))))
(packages (append (list
grimshot
i3status-rust
@ -70,7 +121,13 @@
(packages (append neovim-packages
emacs-packages
(list jujutsu
yt-dlp
mpv
starship
font-awesome
font-atkinson-hyperlegible-next
fastfetch
pavucontrol
ripgrep
fd
sd
@ -85,13 +142,16 @@
home-environment-variables-service-type
'(("EDITOR" . "nvim")))
(service home-fish-service-type)
(service home-fish-service-type (home-fish-configuration (config (list (local-file "files/starship.fish")))))
(service home-sway-service-type sway-config)
(service home-dbus-service-type)
(service home-pipewire-service-type)
(service home-dotfiles-service-type
(home-dotfiles-configuration
(directories '("./dotfiles"))))
(home-dotfiles-configuration
(directories '("./dotfiles"))))
(service home-files-service-type
`((".guile" ,%default-dotguile)

22
packages/fonts.scm Normal file
View file

@ -0,0 +1,22 @@
(define-module (packages fonts)
#:use-module (guix build-system font))
(define-public font-atkinson-hyperlegible-next
(package
(name "font-atkinson-hyperlegible-next")
(version "2.001-unstable-2025-02-21")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/googlefonts/atkinson-hyperlegible-next")
(commit "7925f50f649b3813257faf2f4c0b381011f434f1")))
(file-name (git-file-name name version))
(sha256
(base32 "0000000000000000000000000000000000000000000000000000"))))
(build-system font-build-system)
(home-page "https://www.brailleinstitute.org/freefont/")
(synopsis "New (2024) second version of the Atkinson Hyperlegible fonts")
(description
"Read Easier With Our Family of Hyperlegible® Fonts")
(license license:ofl)))