From a6cdb302e220017b8454df7bcc63abfe5d9403d6 Mon Sep 17 00:00:00 2001
From: Tom Willemse <tom@ryuslash.org>
Date: Tue, 7 Nov 2023 15:57:00 -0800
Subject: [PATCH] Add emacs-syncthing-status

---
 oni/home/config/rincewind.scm |  4 +++-
 oni/packages/emacs.scm        | 25 +++++++++++++++++++++++++
 2 files changed, 28 insertions(+), 1 deletion(-)

diff --git a/oni/home/config/rincewind.scm b/oni/home/config/rincewind.scm
index b026bad..9532af6 100644
--- a/oni/home/config/rincewind.scm
+++ b/oni/home/config/rincewind.scm
@@ -132,7 +132,8 @@
                 #:select (count-emails))
   #:use-module ((oni packages emacs)
                 #:select (emacs-inkplate
-                          oni-emacs-notmuch))
+                          oni-emacs-notmuch
+                          emacs-syncthing-status))
   #:use-module ((oni packages emacs-config)
                 #:select (emacs-oni-org-roam
                           emacs-oni-vterm
@@ -279,6 +280,7 @@
                  mpd-random-albums
                  notmuch
                  emacs-inkplate
+                 emacs-syncthing-status
                  emacs-outli
                  emacs-guix
 
diff --git a/oni/packages/emacs.scm b/oni/packages/emacs.scm
index ad6ee92..6f20a83 100644
--- a/oni/packages/emacs.scm
+++ b/oni/packages/emacs.scm
@@ -472,3 +472,28 @@ the main focus will have the perfect size for editing, while the ones that are
 not being actively edited will be re-sized to a smaller size that doesn't get in
 the way, but at the same time will be readable enough to know it's content.")
       (license license:expat))))
+
+(define-public emacs-syncthing-status
+  (let ((commit "3d521e3929cc4e4060205b969a1a37f516758b77")
+        (revision "0"))
+    (package
+      (name "emacs-syncthing-status")
+      (version (git-version "0.0.0" revision commit))
+      (source
+       (origin
+         (uri (git-reference
+               (url "https://github.com/bharadswami/syncthing-status.el.git")
+               (commit commit)))
+         (method git-fetch)
+         (file-name (git-file-name name version))
+         (sha256
+          (base32 "0bvfnkr851ghnax9aj13dw9kmhf34734qfnkmjdzfri5dcad10ck"))))
+      (propagated-inputs
+       (list emacs-request))
+      (build-system emacs-build-system)
+      (home-page "https://github.com/bharadswami/syncthing-status.el")
+      (synopsis "Elisp to quickly get sync status of folders and devices on Syncthing")
+      (description "Elisp to quickly get sync status of folders and devices on Syncthing. Uses the
+Syncthing REST API and request package to get this data and display it in an
+Emacs buffer.")
+      (license license:expat))))