From e16c8fcb5f289851af6e89548b77b51a46a77337 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Carlos=20Dur=C3=A1n=20Dom=C3=ADnguez?= <wurt@wurt.eu>
Date: Fri, 16 Jan 2026 01:18:40 +0100
Subject: [PATCH] gnu: mailcap: Update to 2.1.54.

* gnu/packages/mail.scm (mailcap): Update to 2.1.54.  Fix references to
/usr/bin/xdg-open.

Change-Id: I25c0e3da789b98a2bd909a5551b4bdb93735cde9
Signed-off-by: Gabriel Wicki <gabriel@erlikon.ch>
Signed-off-by: Rutherther <rutherther@ditigal.xyz>
---
 gnu/packages/mail.scm | 10 ++++++++--
 1 file changed, 8 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
index d1d472e251a1387650170d534b85760e6595687a..bc0a8ce3d751ffbba5d653c30ce21d7b1ad8d416 100644
--- a/gnu/packages/mail.scm
+++ b/gnu/packages/mail.scm
@@ -65,6 +65,7 @@
 ;;; Copyright © 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
 ;;; Copyright © 2025 Zacchaeus <eikcaz@zacchae.us>
 ;;; Copyright © 2025 Andreas Enge <andreas@enge.fr>
+;;; Copyright © 2026 Carlos Durán Domínguez <wurt@wurt.eu>
 ;;;
 ;;; This file is part of GNU Guix.
 ;;;
@@ -1139,7 +1140,7 @@ MIME-encoded email package.")
       (license license:bsd-3))))
 
 (define-public mailcap
-  (let* ((version "2.1.53")
+  (let* ((version "2.1.54")
          (tag ;; mailcap tags their releases like this: rMajor-minor-patch
           (string-append "r" (string-join (string-split version #\.) "-"))))
     (package
@@ -1153,12 +1154,17 @@ MIME-encoded email package.")
                (commit tag)))
          (file-name (git-file-name name version))
          (sha256
-          (base32 "14939pq7h25rh9100z72vzzx810yqg98im9gz2fbhh47iaj1wrbb"))))
+          (base32 "163kf88spdvywhym08487ia7y88dq7mn93hz8q4qa1wjha4rhb5n"))))
       (build-system gnu-build-system)
       (arguments
        '(#:phases
          (modify-phases %standard-phases
            (delete 'configure)
+           (add-before 'install 'patch-xdg-open-references
+             (lambda _
+               (substitute* "mailcap"
+                 ;; If /usr/bin/xdg-open does not exists.
+                 (("/usr/bin/xdg-open") "/usr/bin/env xdg-open"))))
            (add-before 'install 'set-dest-dir
              (lambda* (#:key outputs #:allow-other-keys)
                (let ((out (assoc-ref outputs "out")))