bug#71658: closed ([PATCH] gnu: emacs-notmuch: Install desktop files.)

[GNU bug Tracking System]

Your message dated Thu, 20 Jun 2024 02:14:32 +0000
with message-id <f0db068b7f1eb4e4e4649def6f63b1763af2760c@dismail.de>
and subject line Re: [PATCH] gnu: emacs-notmuch: Install desktop files.
has caused the debbugs.gnu.org bug report #71658,
regarding [PATCH] gnu: emacs-notmuch: Install desktop files.
to be marked as done.

(If you believe you have received this mail in error, please contact
help-debbugs@gnu.org.)


-- 
71658: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=71658
GNU Bug Tracking System
Contact help-debbugs@gnu.org with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> [PATCH] gnu: emacs-notmuch: Install desktop files.
>
>
>
>
> Date: 
>
> Wed, 19 Jun 2024 23:26:35 +0100
>
>
>
>
> * gnu/packages/mail.scm (emacs-notmuch)[arguments]: Add install-desktop-files
> phase.
>
> Change-Id: I9f3a049acb7062807a58d95ca526813caab0d563
> ---
>  gnu/packages/mail.scm | 18 +++++++++++++++++-
>  1 file changed, 17 insertions(+), 1 deletion(-)
>
> diff --git a/gnu/packages/mail.scm b/gnu/packages/mail.scm
> index d853fab4d3..fe2135a22d 100644
> --- a/gnu/packages/mail.scm
> +++ b/gnu/packages/mail.scm
> @@ -1512,7 +1512,23 @@ (define-public emacs-notmuch
>                (let ((notmuch (search-input-file inputs "/bin/notmuch")))
>                  (substitute* "notmuch-lib.el"
>                    (("\"notmuch\"")
> -                   (string-append "\"" notmuch "\"")))))))))
> +                   (string-append "\"" notmuch "\""))))))
> +          ;; Install desktop files so that mailto URIs can be opened using
> +          ;; emacs-notmuch.
> +          (add-after 'install 'install-desktop-files
> +            (lambda* (#:key inputs #:allow-other-keys)
> +              (install-file "notmuch-emacs-mua"
> +                            (string-append #$output "/bin"))
> +              (let ((applications (string-append #$output 
> "/share/applications")))
> +                (install-file "notmuch-emacs-mua.desktop"
> +                              applications)
> +                (copy-file "notmuch-emacs-mua.desktop"
> +                           (string-append applications
> +                                          "/notmuch-emacsclient-mua.desktop"))
> +                (substitute* (string-append applications
> +                                            "/notmuch-emacsclient-mua.desktop")
> +                  (("Exec=notmuch-emacs-mua" all)
> +                   (string-append all " --client")))))))))
>      (synopsis "Run Notmuch within Emacs")
>      (description
>       "This package provides an Emacs-based interface to the Notmuch mail
>
> base-commit: e32e3d0a03dc17c4c54a91aad053c9036998b601
> -- 
> 2.45.1
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: [PATCH] gnu: emacs-notmuch: Install desktop files.
>
>
>
>
> Date: 
>
> Thu, 20 Jun 2024 02:14:32 +0000
>
>
>
>
> Applied!
>
> thanks for adding that,
>
> jgart
>
>
> --- End Message ---