1 files changed, 41 insertions, 0 deletions
diff --git a/oni/packages/notmuch-tag-mailinglists.scm b/oni/packages/notmuch-tag-mailinglists.scm
new file mode 100644
index 0000000..4273bf0
--- /dev/null
+++ b/oni/packages/notmuch-tag-mailinglists.scm
@@ -0,0 +1,41 @@
+(define-module (oni packages notmuch-tag-mailinglists)
+  #:use-module (guix packages)
+  #:use-module (guix git-download)
+  #:use-module (guix build-system gnu)
+  #:use-module ((guix licenses) #:prefix license:)
+  #:use-module (gnu packages base)
+  #:use-module (gnu packages bash)
+  #:use-module (gnu packages mail))
+
+(define-public notmuch-tag-mailinglists
+  (let ((commit "b20cf1593c98b415cb144bd23c9c60926161d359")
+        (revision "0"))
+    (package
+     (name "notmuch-tag-mailinglists")
+     (version (git-version "0.0.0" revision commit))
+     (source
+      (origin
+       (uri (git-reference
+             (url "git://ryuslash.org/util/tom/notmuch-tag-mailinglists.git")
+             (commit commit)))
+       (method git-fetch)
+       (sha256
+        (base32 "0c3pn3ns4n5sh97plvbxv59i5rh8840fq73ic66kvhkij1c6l4rb"))
+       (file-name (git-file-name name version))))
+     (propagated-inputs
+      (list bash notmuch))
+     (build-system gnu-build-system)
+     (arguments
+      `(#:tests? #f
+        #:phases
+        (modify-phases %standard-phases
+                       (delete 'configure)
+                       (delete 'build)
+                       (replace 'install
+                                (lambda* (#:key outputs #:allow-other-keys)
+                                  (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+                                    (install-file "notmuch-tag-mailinglists" bin)))))))
+     (home-page "https://ryuslash.org/")
+     (synopsis "A simple script that scans email subjects for tasks to add.")
+     (description "Creates tasks based on incoming email.")
+     (license license:gpl3+))))