From fc71258065759111280a60c1870f496edefb7921 Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 17 Jul 2025 22:21:01 -0700
Subject: oni/packages/emacs: Add ‘emacs-sawfish’

This package installs the sawfish major mode that is included in the Sawfish
window manager. This file is not included in the sawfish window manager package.

This package doesn't use the same source as that of the official package because
while testing it looked like the original source location isn't accessible.
---
 oni/packages/emacs.scm | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)

diff --git a/oni/packages/emacs.scm b/oni/packages/emacs.scm
index 5dd40f9..f288810 100644
--- a/oni/packages/emacs.scm
+++ b/oni/packages/emacs.scm
@@ -900,3 +900,28 @@ README.md from the same repository for extended documentation.")
         (file-name (git-file-name name version))
         (sha256
          (base32 "0jbj48glh0r6fkb0lk1xb9067x2myp3krkw2byycijwdq1nlqzv2")))))))
+
+(define-public emacs-sawfish
+  (let ((commit "ba51040997cbdb6c138bf4180e69e794f094f630")
+        (revision "0"))
+    (package
+      (name "emacs-sawfish")
+      (version "1.13.0")
+      (source
+       (origin
+         (method git-fetch)
+         (url (git-reference
+               (url "https://github.com/SawfishWM/sawfish")
+               (commit commit)))
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "0jbj48glh0r6fkb0lk1xb9067x2myp3krkw2byycijwdq1nlqzv2"))))
+      (build-system emacs-build-system)
+      (arguments
+       '(#:include '("sawfish.el")))
+      (home-page "https://sawfish.tuxfamily.org")
+      (synopsis "Sawfish mode.")
+      (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."))))
-- 
cgit v1.3-2-g0d8e