From dd8f52be9d19c35bbcd02b094c0ce0b97da82bf6 Mon Sep 17 00:00:00 2001
From: Daniel Ziltener <dziltener@lyrion.ch>
Date: Sat, 9 Dec 2023 16:32:29 +0100
Subject: [PATCH] .

---
 home/emacs/init.el          | 26 +++++++++++++++++++-------
 home/emacs/templates        |  7 +++++++
 home/home-configuration.scm |  5 ++++-
 3 files changed, 30 insertions(+), 8 deletions(-)

diff --git a/home/emacs/init.el b/home/emacs/init.el
index 03f05d7..740b30b 100644
--- a/home/emacs/init.el
+++ b/home/emacs/init.el
@@ -619,7 +619,23 @@ Point must be at the beginning of balanced expression (sexp)."
   (evil-define-key 'normal 'cider-mode-map
     (kbd "<localleader>ce") #'cider-eval-sexp-at-point))
 
-;;;;; Chicken Scheme
+;;;;; Scheme
+
+(use-package geiser
+  :custom
+  (geiser-chicken-match-limit 200)
+  :config
+  (defalias 'run-geiser 'geiser))
+
+(use-package paren-face
+  :hook
+  scheme-mode
+  emacs-lisp-mode)
+
+(use-package highlight-parentheses
+  :hook prog-mode)
+
+;;;;;; Chicken Scheme
 (use-package scheme
   :config
   (eval-after-load 'eglot
@@ -634,14 +650,10 @@ Point must be at the beginning of balanced expression (sexp)."
             #'flymake-chicken-backend nil t)
   (flymake-mode))
 
-(use-package geiser
-  :custom
-  (geiser-chicken-match-limit 200)
-  :config
-  (defalias 'run-geiser 'geiser))
-
 (use-package geiser-chicken)
 
+;;;;;; Guile
+
 (use-package geiser-guile
   :config
   (when (executable-find "guix")
diff --git a/home/emacs/templates b/home/emacs/templates
index 06e0ca2..a54ad07 100644
--- a/home/emacs/templates
+++ b/home/emacs/templates
@@ -38,6 +38,13 @@ scheme-mode
  n> "(description \"" synopsis "\")"
  n> "(license license:" (s license) ")))")
 
+org-mode
+
+(src
+ "#+begin_src " p
+ n p n
+ "#+end_src")
+
 ;; Local Variables:
 ;; mode: lisp-data
 ;; outline-regexp: "[a-z]"
diff --git a/home/home-configuration.scm b/home/home-configuration.scm
index d71774a..10e6dcc 100644
--- a/home/home-configuration.scm
+++ b/home/home-configuration.scm
@@ -35,10 +35,11 @@
 	 "emacs"
          "emacs-direnv"
          "diff-so-fancy"
+         "firefox"
          "fuzzel"
          "gammastep"
 	 "guile"
-	 ;; "glibc-locales"
+	 "glibc-locales"
          "icecat"
          "icedove-wayland"
          "kitty"
@@ -46,7 +47,9 @@
          "password-store"
          "pass-otp"
          "passff-icecat"
+         "pavucontrol"
          "pinentry-qt"
+         "pipewire"
          "rust"
          "rust-cargo"
          "senpai"