Update Emacs config.

1 files changed, 16 insertions, 3 deletions

diff --git a/dotfiles/.emacs.d/init.el b/dotfiles/.emacs.d/init.el
index 2adaabe..f2180d8 100644
--- a/dotfiles/.emacs.d/init.el
+++ b/dotfiles/.emacs.d/init.el
@@ -1,5 +1,10 @@
 ;; -*- lexical-binding: t -*-
 
+;; For some reason native compilation is going *absolutely ham* on my
+;; system and spawning as many native compilation processes as it
+;; possibly can, causing my system to completely lock up.
+(setq native-comps-async-number 1)
+
 ;; Super handy macro for loading packages but not stopping the init
 ;; process if they aren't found.
 (require 'use-package)
@@ -52,7 +57,7 @@
 
 
 ;;;
-;;; Package Management
+;;; Guix
 ;;;
 
 (use-package guix
@@ -63,6 +68,14 @@
   (guix-load-path '("~/.guix/current/share/guile/site/3.0"))
   (guix-load-compiled-path '("~/.guix/current/lib/guile/3.0/site-ccache")))
 
+;; (use-package inheritenv)
+
+;; (use-package buffer-env
+;;  :config
+;;  (add-hook 'hack-local-variables-hook 'buffer-env-update)
+;;  :custom
+;;  (buffer-env-script-name "guix.scm"))
+
 
 ;;;
 ;;; Dired
@@ -395,7 +408,7 @@ indentation."
   (interactive)
   (push-mark)
   (push-mark (point-max) nil t)
-  (lexical-let ((p (point)))
+  (let ((p (point)))
     (goto-char (point-min))
     (org-sort-entries nil ?p)
     (org-sort-entries nil ?o)
@@ -432,7 +445,7 @@ indentation."
            (erc-autojoin-channels-alist
             '(("libera.chat"
                "#gnuassembly" "#guile" "#guile-steel" "#guix" "#lispgames"
-               "#chickadee")))
+               "#chickadee" "#spritely")))
            ;; Don't open channel buffers in place of the current
            ;; buffer because that drives me fucking crazy.
            (erc-join-buffer 'bury)