From b03d1a86bee99cb2dcbef9fc8f59e37893718bc3 Mon Sep 17 00:00:00 2001
From: Tom Willemse <tom@ryuslash.org>
Date: Sun, 15 Oct 2023 22:12:51 -0700
Subject: [PATCH] Add package for Sawfish's Emacs mode

---
 oni/packages/sawfish.scm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 oni/packages/sawfish.scm

diff --git a/oni/packages/sawfish.scm b/oni/packages/sawfish.scm
new file mode 100644
index 0000000..22350c8
--- /dev/null
+++ b/oni/packages/sawfish.scm
@@ -0,0 +1,24 @@
+(define-module (oni packages sawfish)
+  #:use-module ((gnu packages sawfish)
+                #:select (sawfish))
+  #:use-module ((guix packages)
+                #:select (package))
+  #:use-module ((guix build-system emacs)
+                #:select (emacs-build-system)))
+
+(define-public emacs-sawfish
+  (package
+    (inherit sawfish)
+    (name "emacs-sawfish")
+    (build-system emacs-build-system)
+    (arguments
+     '(#:include '("sawfish.el")))
+    (synopsis "Sawfish mode")
+    (native-inputs (list))
+    (inputs (list))
+    (description "\"sawfish.el\" provides
+* A major mode for writing Sawfish code.
+  This include symbol / var / func completion and help access,
+  both from doc-string and info file.
+* sawfish-client wrapper, i.e. an interface to interact with
+  running Sawfish window manager.")))