Re: [PATCH] emacs: Add compatibility for org-msg.el

Subject: Re: [PATCH] emacs: Add compatibility for org-msg.el

Date: Wed, 23 Jun 2021 08:56:00 +0100

To: Ori, notmuch@notmuchmail.org

Cc: Ori

From: David Edmondson


On Tuesday, 2021-06-22 at 17:48:50 -04, Ori wrote:

> See https://github.com/jeremy-compostella/org-msg/issues/53

It would be nice to have an inline description of the change, as the
github repository might disappear at some point, but the fix looks
reasonable.

Reviewed-by: David Edmondson <dme@dme.org>

> ---
>  NEWS                     | 2 ++
>  emacs/notmuch-company.el | 3 ++-
>  2 files changed, 4 insertions(+), 1 deletion(-)
>
> diff --git a/NEWS b/NEWS
> index 09456f60..c167c9a2 100644
> --- a/NEWS
> +++ b/NEWS
> @@ -8,6 +8,8 @@ Emacs
>  previous behaviour of using notmuch to send mail by default, customize
>  `mail-user-agent` to `notmuch-user-agent`.
>  
> +`notmuch-company` now works in `org-msg`.
> +
>  Vim
>  ---
>  
> diff --git a/emacs/notmuch-company.el b/emacs/notmuch-company.el
> index c6a004ae..7e05dc8f 100644
> --- a/emacs/notmuch-company.el
> +++ b/emacs/notmuch-company.el
> @@ -70,7 +70,8 @@
>  	(completion-ignore-case t))
>      (cl-case command
>        (interactive (company-begin-backend 'notmuch-company))
> -      (prefix (and (derived-mode-p 'message-mode)
> +      (prefix (and (or (derived-mode-p 'message-mode)
> +		       (derived-mode-p 'org-msg-edit-mode))
>  		   (looking-back
>  		    (concat notmuch-address-completion-headers-regexp ".*")
>  		    (line-beginning-position))
> -- 
> 2.25.1
> _______________________________________________
> notmuch mailing list -- notmuch@notmuchmail.org
> To unsubscribe send an email to notmuch-leave@notmuchmail.org

dme.
-- 
There's someone in my head but it's not me.
_______________________________________________
notmuch mailing list -- notmuch@notmuchmail.org
To unsubscribe send an email to notmuch-leave@notmuchmail.org

Thread: