Re: completion no more working with latest HEADs (emacs and bbdb)

[Arash Esbati <arash@gnu.org>]

Julien Cubizolles <j.cubizolles@free.fr> writes:

> Arash Esbati <arash@gnu.org> writes:
>
>> (setq eudc-server-hotlist '(("localhost" . bbdb)))
>>
>> (add-hook 'message-mode-hook
>>           (lambda ()
>>             (setq-local completion-at-point-functions
>>                         (delq 'message-completion-function
>>                               completion-at-point-functions))
>>             (add-to-list 'completion-at-point-functions
>>                          #'eudc-capf-complete)))
>
> I noticed that this setup, while working for bbdb completions in the To: field,
> breaks it for completing groups in the Gcc: field.
>
> I get both completions working with:
>
>  (add-hook 'message-mode-hook
>            (lambda ()
>              (add-to-list 'completion-at-point-functions
>                           #'eudc-capf-complete)))

This is by design:

,----[ C-h f eudc-capf-complete RET ]
| eudc-capf-complete is an autoloaded native-compiled Lisp function in
| ‘eudc-capf.el’.
| 
| (eudc-capf-complete)
| 
| Email address completion function for ‘completion-at-point-functions’.
| 
| This function checks whether the current major mode is one of the
| modes listed in ‘eudc-capf-modes’, and whether point is on a line
| with a message header listing email recipients, that is, a line
| whose beginning matches ‘message-email-recipient-header-regexp’,
| and, if the check succeeds, searches for records matching the
| words before point.
| 
| The return value is either nil when no match is found, or a
| completion table as required for functions listed in
| ‘completion-at-point-functions’.
| 
|   Probably introduced at or before Emacs version 29.1.
| 
`----

And in addition:

,----[ C-h v message-email-recipient-header-regexp RET ]
| message-email-recipient-header-regexp is a variable defined in ‘message.el’.
| 
| Its value is
| "^\\([^ :]*-\\)?\\(To\\|B?Cc\\|From\\|Reply-to\\|Mail-Followup-To\\|Mail-Copies-To\\):"
| 
| Regexp matching headers that list email addresses.
| 
|   This variable was introduced, or its default value was changed, in
|   version 29.1 of Emacs.
|   You can customize this variable.
| 
`----

So you have to tweak the regexp to something like this:

  "^\\([^ :]*-\\)?\\(To\\|[BG]?Cc\\|From\\|Reply-to\\|Mail-Followup-To\\|Mail-Copies-To\\):"

Best, Arash