gnu: Add emacs-spamfilter-el.

* gnu/packages/emacs-xyz.scm (emacs-spamfilter-el): New variable.
(emacs-wanderlust)[inputs]: Add emacs-spamfilter-el.

Signed-off-by: Andrew Tropin <andrew@trop.in>
This commit is contained in:
Hilton Chain 2023-06-24 20:26:02 +08:00 committed by Andrew Tropin
parent 63660f0feb
commit 5f7b7d1c61
No known key found for this signature in database
GPG key ID: 2208D20958C1DEB0

View file

@ -35401,6 +35401,50 @@ (define-public emacs-spaceleader
provides an easy way to bind keys under a configurable prefix key.")
(license license:gpl3+))))
(define-public emacs-spamfilter-el
(package
(name "emacs-spamfilter-el")
(version "1.13")
(source (origin
(method url-fetch)
(uri (string-append
"https://web.archive.org/web/20190227001412/"
"http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/"
"spamfilter-1.1.tar.gz"))
(sha256
(base32
"1rd7wfn24bqlqlrrhq0d87vfhhcq09pnmrkkr7jpcnsls081a2iv"))))
(build-system emacs-build-system)
(arguments
(list
#:phases
#~(modify-phases %standard-phases
(add-after 'unpack 'convert-encoding
(lambda _
(for-each
(lambda (name)
(invoke "iconv" "-f" "EUC-JP" "-t" "UTF-8" name "-o" name))
(find-files "." "\\.el")))))))
(home-page
(string-append
"https://web.archive.org/web/20190326203214/"
"http://www.geocities.co.jp/SiliconValley-PaloAlto/7043/"
"index.html#spamfilter.el"))
(synopsis "Bayesian spam filter")
(description
"This package provides a spam filtering library for Emacs MUAs. It
supports Japanese and has the following features:
@itemize
@item Pure Emacs Lisp implementation.
@item Interactive process within the MUA.
@item Incremental corpus learning.
@item Three different methods for Japanese word segmentation.
@item Built-in support for @code{emacs-wanderlust} and @code{emacs-mew}.
@item @url{https://github.com/naota/navi2ch, Navi2ch} integration.
@end itemize\n")
(license license:gpl2+)))
(define-public emacs-promise
;; XXX: Last stable release fails to build with "(wrong-number-of-arguments
;; (3 . 4) 2)" error.
@ -37135,6 +37179,7 @@ (define-public emacs-wanderlust
(invoke "make" "install")
(invoke "make" "install-info"))))))
(propagated-inputs (list emacs-semi-epg))
(inputs (list emacs-spamfilter-el))
(home-page "https://www.emacswiki.org/emacs/WanderLust")
(synopsis "Yet Another Message Interface on Emacsen")
(description