From 31357da6b9ed2a44ce9bab79b1497ada0e799339 Mon Sep 17 00:00:00 2001
From: Timo Wilken
Date: Sun, 11 Dec 2022 12:55:37 +0100
Subject: Add scheme shebangs to magic-mode-alist

---
 emacs-init.el | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/emacs-init.el b/emacs-init.el
index fea3d4e1..fe4dab87 100644
--- a/emacs-init.el
+++ b/emacs-init.el
@@ -54,6 +54,12 @@
         (,(rx ".gnuplot" eos) . gnuplot-mode)
         (,(rx ".aurora" eos) . python-mode)))
 
+(add-to-list 'magic-mode-alist
+             `(,(rx "#!" (* (not space))
+                    (? "env" (+ space) (? "-S" (+ space)))
+                    (or "guile" "racket"))
+               . scheme-mode))
+
 (add-hook 'mail-mode-hook #'auto-fill-mode)
 
 ;; `use-package' requirements.
-- 
cgit v1.2.3