All changes from before I switched distros

This commit is contained in:
Skylar Hill 2024-06-19 12:21:24 -05:00
parent a7a4592384
commit 57b4ab5fd2
8 changed files with 128 additions and 41 deletions

View file

@ -54,6 +54,12 @@ Set default Scheme implementation
#+begin_src emacs-lisp
(setq geiser-scheme-implementation 'guile)
#+end_src
** skribilo-mode
This is installed via the ~skribilo~ package in Guix.
#+begin_src emacs-lisp
(autoload 'skribilo-mode "skribilo.el" "Skribilo mode." t)
#+end_src
* Doom init file
:PROPERTIES:
:header-args:emacs-lisp: :tangle home/doom/init.el
@ -87,7 +93,7 @@ Set default Scheme implementation
minimap ; show a map of the code on the side
modeline ; snazzy, Atom-inspired modeline, plus API
;;nav-flash ; blink cursor line after big motions
;;neotree ; a project drawer, like NERDTree for vim
neotree ; a project drawer, like NERDTree for vim
ophints ; highlight the region an operation acts on
(popup +defaults) ; tame sudden yet inevitable temporary windows
;;tabs ; a tab bar for Emacs
@ -144,7 +150,7 @@ Set default Scheme implementation
lookup ; navigate your code and its documentation
lsp ; M-x vscode
magit ; a git porcelain for Emacs
;;make ; run make tasks from Emacs
make ; run make tasks from Emacs
;;pass ; password manager for nerds
;;pdf ; pdf enhancements
;;prodigy ; FIXME managing external services & code builders
@ -162,7 +168,7 @@ Set default Scheme implementation
:lang
;;agda ; types of types of types of types...
;;beancount ; mind the GAAP
;;(cc +lsp) ; C > C++ == 1
(cc +lsp) ; C > C++ == 1
;;clojure ; java with a lisp
common-lisp ; if you've seen one lisp, you've seen them all
;;coq ; proofs-as-programs
@ -199,7 +205,7 @@ Set default Scheme implementation
markdown ; writing docs for people to ignore
;;nim ; python + lisp at the speed of c
;;nix ; I hereby declare "nix geht mehr!"
;;ocaml ; an objective camel
ocaml ; an objective camel
(org +pomodoro +roam2) ; organize your plain life in plain text
;;php ; perl's insecure younger brother
;;plantuml ; diagrams for confusing people more
@ -211,15 +217,15 @@ Set default Scheme implementation
;;rest ; Emacs as a REST client
;;rst ; ReST in peace
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
;;(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
;;scala ; java, but good
(scheme +guile +gambit) ; a fully conniving family of lisps
(scheme +guile) ; a fully conniving family of lisps
sh ; she sells {ba,z,fi}sh shells on the C xor
;;sml
;;solidity ; do you need a blockchain? No.
;;swift ; who asked for emoji variables?
;;terra ; Earth and Moon in alignment for performance.
;;web ; the tubes
web ; the tubes
;;yaml ; JSON, but readable
;;zig ; C, but simpler
@ -249,6 +255,13 @@ Set default Scheme implementation
A custom mode for hex0, that I wrote.
#+begin_src emacs-lisp
(package! example
:recipe (:host nil :repo "https://git.solarpunk.moe/stellarskylark/hex0-mode.el"))
:recipe (:host nil :repo "https://git.solarpunk.moe/stellarskylark/hex0-mode.el"))
#+end_src
** paredit
#+begin_src emacs-lisp
(package! paredit)
#+end_src
** org-caldav
#+begin_src emacs-lisp
(package! org-caldav)
#+end_src

View file

@ -10,6 +10,7 @@
(nongnu packages linux)
(nongnu system linux-initrd)
(gnu packages cups)
(gnu packages shells)
(nongnu packages printers))
(use-service-modules cups desktop networking ssh syncthing xorg)
#+end_src
@ -31,6 +32,7 @@
(name "skylar")
(comment "Skylar")
(group "users")
(shell (file-append fish "/bin/fish"))
(home-directory "/home/skylar")
(supplementary-groups '("wheel" "netdev" "audio" "video")))
%base-user-accounts))
@ -41,8 +43,7 @@
;; Packages installed system-wide. Users can also install packages
;; under their own account: use 'guix search KEYWORD' to search
;; for packages and 'guix install PACKAGE' to install a package.
(packages (append (specifications->packages (list "nss-certs"))
%base-packages))
(packages %base-packages)
#+end_src
*** Services
@ -68,8 +69,7 @@
(home "/home/skylar")))
(simple-service 'add-hosts
hosts-service-type
(list (host "192.168.254.167" "skylarhill.me")
(host "192.168.254.167" "vtt"
(list (host "192.168.254.167" "vtt"
'("vtt.skylarhill.me"))
(host "192.168.254.167" "files"
'("files.skylarhill.me")))))
@ -155,17 +155,29 @@
"font-microsoft-web-core-fonts"
"font-sony-misc"
"gerbil"
"gimp"
"git"
"gnupg"
"gnutls"
"guile"
"guile-hall"
"hare"
"haunt"
"hicolor-icon-theme"
"hplip"
"inkscape"
"ispell"
"kicad"
"kicad-footprints"
"kicad-symbols"
"kitty"
"kmonad"
"kwallet"
"libresprite"
"magic-wormhole"
"markdown"
"nheko"
"node"
"offlineimap3"
"okular"
"opentaxsolver"
@ -173,14 +185,16 @@
"pamixer"
"password-store"
"pavucontrol"
"profanity"
"python"
"racket"
"ripgrep"
"rofi"
"rofi-pass"
"sbcl-stumpwm-pamixer"
"rsync"
"skribilo"
"smtpmail"
"steam"
"stumpwm"
"swi-prolog"
"unzip"
"xclip"
@ -192,7 +206,7 @@
;; 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
(list #;(service home-bash-service-type
(home-bash-configuration
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
@ -204,6 +218,22 @@
(bash-profile (list (local-file
"/home/skylar/.config/guix/home/.bash_profile"
"bash_profile")))))
(service home-fish-service-type
(home-fish-configuration
(environment-variables '(("GUILE_LOAD_PATH" . "/home/skylar/.guix-home/profile/share/guile/site/3.0:/run/current-system/share/guile/site/3.0")
("GUILE_LOAD_COMPILED_PATH" . "/home/skylar/.guix-home/profile/lib/guile/site/3.0:/run/current-system/share/guile/site/3.0")))
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
("ll" . "ls -l")
("ls" . "ls -p --color=auto")))))
(service home-bash-service-type
(home-bash-configuration
(environment-variables '(("GUILE_LOAD_PATH" . "/home/skylar/.guix-home/profile/share/guile/site/3.0:/run/current-system/share/guile/site/3.0")
("GUILE_LOAD_COMPILED_PATH" . "/home/skylar/.guix-home/profile/lib/guile/site/3.0:/run/current-system/share/guile/site/3.0")))
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
("ll" . "ls -l")
("ls" . "ls -p --color=auto")))))
(service home-gpg-agent-service-type
(home-gpg-agent-configuration
(pinentry-program

View file

@ -1,11 +1,11 @@
(list (channel
(name 'nonguix)
(url "https://gitlab.com/nonguix/nonguix")
(introduction
(make-channel-introduction
"897c1a470da759236cc11798f4e0a5f7d4d59fbc"
(openpgp-fingerprint
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5"))))
(name 'nonguix)
(url "https://gitlab.com/nonguix/nonguix")
(introduction
(make-channel-introduction
"897c1a470da759236cc11798f4e0a5f7d4d59fbc"
(openpgp-fingerprint
"2A39 3FFF 68F4 EF7A 3D29 12AF 6F51 20A0 22FB B2D5"))))
(channel
(name 'guix)
(url "https://git.savannah.gnu.org/git/guix.git")
@ -13,7 +13,16 @@
;; (commit
;; "7dfb3155fc4dd37bea93a8704c37e4aff87e5013")
(introduction
(make-channel-introduction
"9edb3f66fd807b096b48283debdcddccfea34bad"
(openpgp-fingerprint
"BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA")))))
(make-channel-introduction
"9edb3f66fd807b096b48283debdcddccfea34bad"
(openpgp-fingerprint
"BBB0 2DDF 2CEA F6A8 0D1D E643 A2A0 6DF2 A33A 54FA"))))
(channel
(name 'waggle)
(url "git://git.lunabee.space/waggle")
(branch "trunk")
(introduction
(make-channel-introduction
"4ffb1fd3b89f80bac196d597edf6789dd843fe48"
(openpgp-fingerprint
"4DA1 9E0B 4161 3198 F4F5 9D9C 1A5A 96AD 307C D736")))))

View file

@ -21,3 +21,5 @@
t)
(setq geiser-scheme-implementation 'guile)
(autoload 'skribilo-mode "skribilo.el" "Skribilo mode." t)

View file

@ -25,7 +25,7 @@
minimap ; show a map of the code on the side
modeline ; snazzy, Atom-inspired modeline, plus API
;;nav-flash ; blink cursor line after big motions
;;neotree ; a project drawer, like NERDTree for vim
neotree ; a project drawer, like NERDTree for vim
ophints ; highlight the region an operation acts on
(popup +defaults) ; tame sudden yet inevitable temporary windows
;;tabs ; a tab bar for Emacs
@ -82,7 +82,7 @@
lookup ; navigate your code and its documentation
lsp ; M-x vscode
magit ; a git porcelain for Emacs
;;make ; run make tasks from Emacs
make ; run make tasks from Emacs
;;pass ; password manager for nerds
;;pdf ; pdf enhancements
;;prodigy ; FIXME managing external services & code builders
@ -100,7 +100,7 @@
:lang
;;agda ; types of types of types of types...
;;beancount ; mind the GAAP
;;(cc +lsp) ; C > C++ == 1
(cc +lsp) ; C > C++ == 1
;;clojure ; java with a lisp
common-lisp ; if you've seen one lisp, you've seen them all
;;coq ; proofs-as-programs
@ -137,7 +137,7 @@
markdown ; writing docs for people to ignore
;;nim ; python + lisp at the speed of c
;;nix ; I hereby declare "nix geht mehr!"
;;ocaml ; an objective camel
ocaml ; an objective camel
(org +pomodoro +roam2) ; organize your plain life in plain text
;;php ; perl's insecure younger brother
;;plantuml ; diagrams for confusing people more
@ -149,15 +149,15 @@
;;rest ; Emacs as a REST client
;;rst ; ReST in peace
;;(ruby +rails) ; 1.step {|i| p "Ruby is #{i.even? ? 'love' : 'life'}"}
;;(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
(rust +lsp) ; Fe2O3.unwrap().unwrap().unwrap().unwrap()
;;scala ; java, but good
(scheme +guile +gambit) ; a fully conniving family of lisps
(scheme +guile) ; a fully conniving family of lisps
sh ; she sells {ba,z,fi}sh shells on the C xor
;;sml
;;solidity ; do you need a blockchain? No.
;;swift ; who asked for emoji variables?
;;terra ; Earth and Moon in alignment for performance.
;;web ; the tubes
web ; the tubes
;;yaml ; JSON, but readable
;;zig ; C, but simpler

View file

@ -1,3 +1,6 @@
(package! example
:recipe (:host nil :repo "https://git.solarpunk.moe/stellarskylark/hex0-mode.el"))
:recipe (:host nil :repo "https://git.solarpunk.moe/stellarskylark/hex0-mode.el"))
(package! paredit)
(package! org-caldav)

View file

@ -33,17 +33,29 @@
"font-microsoft-web-core-fonts"
"font-sony-misc"
"gerbil"
"gimp"
"git"
"gnupg"
"gnutls"
"guile"
"guile-hall"
"hare"
"haunt"
"hicolor-icon-theme"
"hplip"
"inkscape"
"ispell"
"kicad"
"kicad-footprints"
"kicad-symbols"
"kitty"
"kmonad"
"kwallet"
"libresprite"
"magic-wormhole"
"markdown"
"nheko"
"node"
"offlineimap3"
"okular"
"opentaxsolver"
@ -51,14 +63,16 @@
"pamixer"
"password-store"
"pavucontrol"
"profanity"
"python"
"racket"
"ripgrep"
"rofi"
"rofi-pass"
"sbcl-stumpwm-pamixer"
"rsync"
"skribilo"
"smtpmail"
"steam"
"stumpwm"
"swi-prolog"
"unzip"
"xclip"
@ -67,7 +81,7 @@
;; 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
(list #;(service home-bash-service-type
(home-bash-configuration
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
@ -79,6 +93,22 @@
(bash-profile (list (local-file
"/home/skylar/.config/guix/home/.bash_profile"
"bash_profile")))))
(service home-fish-service-type
(home-fish-configuration
(environment-variables '(("GUILE_LOAD_PATH" . "/home/skylar/.guix-home/profile/share/guile/site/3.0:/run/current-system/share/guile/site/3.0")
("GUILE_LOAD_COMPILED_PATH" . "/home/skylar/.guix-home/profile/lib/guile/site/3.0:/run/current-system/share/guile/site/3.0")))
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
("ll" . "ls -l")
("ls" . "ls -p --color=auto")))))
(service home-bash-service-type
(home-bash-configuration
(environment-variables '(("GUILE_LOAD_PATH" . "/home/skylar/.guix-home/profile/share/guile/site/3.0:/run/current-system/share/guile/site/3.0")
("GUILE_LOAD_COMPILED_PATH" . "/home/skylar/.guix-home/profile/lib/guile/site/3.0:/run/current-system/share/guile/site/3.0")))
(aliases '(("grep" . "grep --color=auto")
("ip" . "ip -color=auto")
("ll" . "ls -l")
("ls" . "ls -p --color=auto")))))
(service home-gpg-agent-service-type
(home-gpg-agent-configuration
(pinentry-program

View file

@ -2,6 +2,7 @@
(nongnu packages linux)
(nongnu system linux-initrd)
(gnu packages cups)
(gnu packages shells)
(nongnu packages printers))
(use-service-modules cups desktop networking ssh syncthing xorg)
@ -19,6 +20,7 @@
(name "skylar")
(comment "Skylar")
(group "users")
(shell (file-append fish "/bin/fish"))
(home-directory "/home/skylar")
(supplementary-groups '("wheel" "netdev" "audio" "video")))
%base-user-accounts))
@ -26,8 +28,7 @@
;; Packages installed system-wide. Users can also install packages
;; under their own account: use 'guix search KEYWORD' to search
;; for packages and 'guix install PACKAGE' to install a package.
(packages (append (specifications->packages (list "nss-certs"))
%base-packages))
(packages %base-packages)
;; Below is the list of system services. To search for available
;; services, run 'guix system search KEYWORD' in a terminal.
@ -50,8 +51,7 @@
(home "/home/skylar")))
(simple-service 'add-hosts
hosts-service-type
(list (host "192.168.254.167" "skylarhill.me")
(host "192.168.254.167" "vtt"
(list (host "192.168.254.167" "vtt"
'("vtt.skylarhill.me"))
(host "192.168.254.167" "files"
'("files.skylarhill.me")))))