bartronx7/guix
1
0
Fork 0
mirror of https://codeberg.org/guix/guix.git synced 2026-01-25 03:55:08 -06:00
Code Issues Projects Releases Packages Wiki Activity Actions

gnu: mu: Update to 1.12.13-1.46f91ab.

Browse source 
* gnu/packages/mail.scm (mu): Update to 1.12.13-1.46f91ab.

Change-Id: I64a9cab98145dcaf8799da030533cdf85ad1393b
This commit is contained in:
Sergey Trofimov 2025-12-01 09:12:57 +01:00 • committed by Ian Eure
parent 6b33a0c885
commit 383c85f5c3
No known key found for this signature in database
GPG key ID: 8499AC88F1A71CF2
1 changed files with 77 additions and 72 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

149
gnu/packages/mail.scm
View file

@ -1341,81 +1341,86 @@ security functionality including PGP, S/MIME, SSH, and SSL.")
(license license:bsd-3))))
(define-public mu
(package
(name "mu")
(version "1.12.13")
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/djcb/mu")
(commit (string-append "v" version))))
(file-name (git-file-name name version))
(sha256
(base32 "160b0rk2fs3zc3yhvx1wsca4a6xzcyc8rlgimn3qmkvd0b31ngdg"))))
(build-system meson-build-system)
(native-inputs
(list pkg-config
emacs-minimal
gnupg ; for tests
tzdata-for-tests ; for tests
texinfo))
(inputs
(list glib gmime guile-3.0 xapian readline python))
(arguments
(list
#:modules '((guix build meson-build-system)
(guix build emacs-utils)
((guix build guile-build-system)
#:select (target-guile-effective-version))
(guix build utils))
#:imported-modules `(,@%meson-build-system-modules
(guix build guile-build-system)
(guix build emacs-utils))
#:configure-flags
#~(list (format #f "-Dguile-extension-dir=~a/lib" #$output))
#:phases
#~(modify-phases %standard-phases
;; This phase can be removed in the next major release of mu.
;; <https://github.com/djcb/mu/commit/f237a2b9905475fb95da6a04e318d10cab61ddeb>
;; <https://github.com/djcb/mu/commit/fc4d5b01a703e8c8cc390cfea135f08d3b45ccab>
(add-after 'unpack 'patch-bin-references
(lambda _
(substitute* '("guile/tests/test-mu-guile.cc"
"mu/tests/test-mu-query.cc")
(("/bin/sh") (which "sh")))
(substitute* '("lib/tests/bench-indexer.cc"
"lib/utils/mu-utils-file.cc"
"lib/utils/mu-test-utils.cc")
(("/bin/rm") (which "rm")))
(substitute* '("lib/mu-maildir.cc")
(("/bin/mv") (which "mv")))))
(add-after 'install 'fix-ffi
(lambda _
(substitute* (find-files #$output "mu\\.scm")
(("\"libguile-mu\"")
(format #f "\"~a/lib/libguile-mu\"" #$output)))))
(add-after 'install 'install-emacs-autoloads
(lambda _
(emacs-generate-autoloads
"mu4e"
(string-append #$output
"/share/emacs/site-lisp/mu4e"))))
(add-after 'install 'wrap-executable
(lambda _
(let* ((bin (string-append #$output "/bin"))
(version (target-guile-effective-version))
(scm (string-append #$output "/share/guile/site/" version)))
(wrap-program (string-append bin "/mu")
`("GUILE_LOAD_PATH" ":" prefix (,scm)))))))))
(home-page "https://www.djcbsoftware.nl/code/mu/")
(synopsis "Quickly find emails")
(description
"Mu is a tool for dealing with e-mail messages stored in the
;; this commit fixes nondeterministic test failing the build
;; revert back to a tagged release next time
;; <https://github.com/djcb/mu/commit/46f91ab7b7641caac992a41264ac41a76c001c87>
(let ((commit "46f91ab7b7641caac992a41264ac41a76c001c87")
(revision "1"))
(package
(name "mu")
(version (git-version "1.12.13" revision commit))
(source
(origin
(method git-fetch)
(uri (git-reference
(url "https://github.com/djcb/mu")
(commit commit)))
(file-name (git-file-name name version))
(sha256
(base32 "1dbadvpl0fwy975f4i58rq7n85gfjhv92lcdmkv1w3h1mjn2v0sd"))))
(build-system meson-build-system)
(native-inputs
(list pkg-config
emacs-minimal
gnupg ; for tests
tzdata-for-tests ; for tests
texinfo))
(inputs
(list glib gmime guile-3.0 xapian readline python))
(arguments
(list
#:modules '((guix build meson-build-system)
(guix build emacs-utils)
((guix build guile-build-system)
#:select (target-guile-effective-version))
(guix build utils))
#:imported-modules `(,@%meson-build-system-modules
(guix build guile-build-system)
(guix build emacs-utils))
#:configure-flags
#~(list (format #f "-Dguile-extension-dir=~a/lib" #$output))
#:phases
#~(modify-phases %standard-phases
;; This phase can be removed in the next major release of mu.
;; <https://github.com/djcb/mu/commit/f237a2b9905475fb95da6a04e318d10cab61ddeb>
;; <https://github.com/djcb/mu/commit/fc4d5b01a703e8c8cc390cfea135f08d3b45ccab>
(add-after 'unpack 'patch-bin-references
(lambda _
(substitute* '("guile/tests/test-mu-guile.cc"
"mu/tests/test-mu-query.cc")
(("/bin/sh") (which "sh")))
(substitute* '("lib/tests/bench-indexer.cc"
"lib/utils/mu-utils-file.cc"
"lib/utils/mu-test-utils.cc")
(("/bin/rm") (which "rm")))
(substitute* '("lib/mu-maildir.cc")
(("/bin/mv") (which "mv")))))
(add-after 'install 'fix-ffi
(lambda _
(substitute* (find-files #$output "mu\\.scm")
(("\"libguile-mu\"")
(format #f "\"~a/lib/libguile-mu\"" #$output)))))
(add-after 'install 'install-emacs-autoloads
(lambda _
(emacs-generate-autoloads
"mu4e"
(string-append #$output
"/share/emacs/site-lisp/mu4e"))))
(add-after 'install 'wrap-executable
(lambda _
(let* ((bin (string-append #$output "/bin"))
(version (target-guile-effective-version))
(scm (string-append #$output "/share/guile/site/" version)))
(wrap-program (string-append bin "/mu")
`("GUILE_LOAD_PATH" ":" prefix (,scm)))))))))
(home-page "https://www.djcbsoftware.nl/code/mu/")
(synopsis "Quickly find emails")
(description
"Mu is a tool for dealing with e-mail messages stored in the
Maildir format. Mu's purpose in life is to help you to quickly find the
messages you need; in addition, it allows you to view messages, extract
attachments, create new maildirs, and so on.")
(license license:gpl3+)))
(license license:gpl3+))))
(define-public alot
(package