gnu: bogofilter: Update to 1.2.5-0.e264b66.

* gnu/packages/mail.scm (bogofilter): Update to 1.2.5-0.e264b66.
[source]: Switch to git-fetch.
[inputs]: Remove bdb. Add sqlite and gsl.
[native-inputs]: Add autoconf, automake, gettext-minimal, pkg-config,
docbook-xml-4.1.2, docbook-xsl, libxml2, perl, xmlto.
[arguments]<#:phases>{chdir}: New phase.

Change-Id: Id33f8a5cf7cdc7308ab2d17077e9cd0b3f2c3b69
This commit is contained in:
Andreas Enge 2025-08-29 19:20:48 +02:00
parent 7f86f1eae0
commit 0a88ef867a
No known key found for this signature in database
GPG key ID: F7D5C9BF765C61E3

View file

@ -64,6 +64,7 @@
;;; Copyright © 2025 Jelle Licht <jlicht@fsfe.org> ;;; Copyright © 2025 Jelle Licht <jlicht@fsfe.org>
;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
;;; Copyright © 2025 Zacchaeus <eikcaz@zacchae.us> ;;; Copyright © 2025 Zacchaeus <eikcaz@zacchae.us>
;;; Copyright © 2025 Andreas Enge <andreas@enge.fr>
;;; ;;;
;;; This file is part of GNU Guix. ;;; This file is part of GNU Guix.
;;; ;;;
@ -146,6 +147,7 @@
#:use-module (gnu packages lua) #:use-module (gnu packages lua)
#:use-module (gnu packages m4) #:use-module (gnu packages m4)
#:use-module (gnu packages man) #:use-module (gnu packages man)
#:use-module (gnu packages maths)
#:use-module (gnu packages mercury) #:use-module (gnu packages mercury)
#:use-module (gnu packages ncurses) #:use-module (gnu packages ncurses)
#:use-module (gnu packages nettle) #:use-module (gnu packages nettle)
@ -1174,28 +1176,38 @@ MIME-encoded email package.")
license:public-domain))))) ; mailcap and mime.types license:public-domain))))) ; mailcap and mime.types
(define-public bogofilter (define-public bogofilter
;; This is version 1.3.0rc1 from 2025-04-18.
(let ((revision "0")
(commit "e264b66d44fb8a908965b6f1f98497048a0db98b"))
(package (package
(name "bogofilter") (name "bogofilter")
(version "1.2.5") (version (git-version "1.2.5" revision commit))
(source (source
(origin (origin
(method url-fetch) (method git-fetch)
(uri (string-append "mirror://sourceforge/bogofilter/bogofilter-stable/" (uri (git-reference
"bogofilter-" version ".tar.xz")) (url "https://gitlab.com/bogofilter/bogofilter")
(commit commit)))
(file-name (git-file-name name version))
(sha256 (sha256
(base32 "1sl9xrnnlk2sn8gmibhn8li09vnansjbxb9l1182qmgz7cvs2j1j")))) (base32 "1xplhq674gpcinj8c4fgivalqzjayiwq3ykplg3cg25f2wxlzq7z"))))
(build-system gnu-build-system) (build-system gnu-build-system)
(arguments (arguments
'(#:phases (list
(modify-phases %standard-phases #:phases
(add-before 'check 'pre-check #~(modify-phases %standard-phases
(lambda _ (add-after 'unpack 'chdir
(substitute* "src/tests/t.frame" (lambda _
(("GREP=/bin/grep") (chdir "bogofilter")))
(string-append "GREP=" (which "grep") "\n"))) (add-before 'check 'pre-check
#t))))) (lambda _
(native-inputs (list flex)) (substitute* "src/tests/t.frame"
(inputs (list bdb)) (("GREP=/bin/grep")
(string-append "GREP=" (which "grep") "\n"))))))))
(native-inputs (list autoconf automake gettext-minimal pkg-config
flex
docbook-xml-4.1.2 docbook-xsl libxml2 perl xmlto))
(inputs (list gsl sqlite))
(home-page "https://bogofilter.sourceforge.io/") (home-page "https://bogofilter.sourceforge.io/")
(synopsis "Mail classifier based on a Bayesian filter") (synopsis "Mail classifier based on a Bayesian filter")
(description (description
@ -1203,7 +1215,7 @@ MIME-encoded email package.")
(non-spam) by a statistical analysis of the message's header and (non-spam) by a statistical analysis of the message's header and
content (body). The program is able to learn from the user's classifications content (body). The program is able to learn from the user's classifications
and corrections. It is based on a Bayesian filter.") and corrections. It is based on a Bayesian filter.")
(license license:gpl3+))) (license license:gpl3+))))
(define-public offlineimap3 (define-public offlineimap3
;; No release supporting Python3.11, but the latest commit contains it, see ;; No release supporting Python3.11, but the latest commit contains it, see