From c5f637e923b84eab632327ea13e3972030e85edc Mon Sep 17 00:00:00 2001
From: Daniel Ziltener <dziltener@lyrion.ch>
Date: Tue, 19 Dec 2023 02:48:35 +0100
Subject: [PATCH] .

---
 home/emacs/init.el           |  3 ++-
 home/fontforge/fontforge.org | 27 +++++++++++++++++++++++++++
 2 files changed, 29 insertions(+), 1 deletion(-)
 create mode 100644 home/fontforge/fontforge.org

diff --git a/home/emacs/init.el b/home/emacs/init.el
index e4eb199..a9929f4 100644
--- a/home/emacs/init.el
+++ b/home/emacs/init.el
@@ -147,7 +147,8 @@
   :ensure t
   :custom
   (org-babel-load-languages '((emacs-lisp . t)
-                              (scheme . t)))
+                              (scheme . t)
+                              (shell . t)))
   (visual-fill-column-center-text t)
   :hook
   (org-mode . org-indent-mode)
diff --git a/home/fontforge/fontforge.org b/home/fontforge/fontforge.org
new file mode 100644
index 0000000..979c160
--- /dev/null
+++ b/home/fontforge/fontforge.org
@@ -0,0 +1,27 @@
+#+TITLE: Font Forge Scripts
+#+AUTHOR: Daniel Ziltener
+
+* Direnv File
+
+#+begin_src fundamental :eval no :tangle .envrc
+use guix python python-wrapper fontforge curl unzip
+#+end_src
+
+* Nerd Font Patching
+
+As preparation, we need the font patcher:
+
+#+begin_src bash :results none :shebang #!/usr/bin/env bash
+  tmp=$(mktemp)
+  trap "rm -rf '$tmp'" exit
+  curl -L https://github.com/ryanoasis/nerd-fonts/releases/latest/download/FontPatcher.zip > $tmp
+  unzip $tmp
+#+end_src
+
+** Patching Libertinus
+
+#+begin_src bash :results none :shebang #!/usr/bin/env bash
+  curl -L https://github.com/alerque/libertinus/releases/download/v7.040/Libertinus-7.040.tar.xz | tar xJ
+  ln -sf Libertinus-7.040/static/OTF/* .
+  find . -name 'LibertinusSerif*.otf' -print0 | xargs -0 -IX -- direnv exec $PWD/font-patcher X -c --variable-width-glyphs --no-progressbars
+#+end_src