[O] org-contacts completion stopped working

[Julien Cubizolles]

As of a few days ago, completion doesn't work anymore. I get the message
(wrong-number-of-arguments (1 . 2) 4)

Any ideas ?

Julien.

,----
| Debugger entered--Lisp error: (wrong-number-of-arguments (1 . 2) 4)
|   completion-table-case-fold((#("Cubizolles Julien <address@hidden>" 0 17 
(org-category "contacts" fontified nil))) "cubizolles" nil metadata)
|   apply(completion-table-case-fold (#("Cubizolles Julien <address@hidden>" 0 
17 (org-category "contacts" fontified nil))) ("cubizolles" nil metadata))
|   (closure (t) (&rest args) (apply (quote completion-table-case-fold) (quote 
(#("Cubizolles Julien <address@hidden>" 0 17 (org-category "contacts" fontified 
nil)))) args))("cubizolles" nil metadata)
|   completion-metadata("cubizolles" (closure (t) (&rest args) (apply (quote 
completion-table-case-fold) (quote (#("Cubizolles Julien <address@hidden>" 0 17 
(org-category "contacts" fontified nil)))) args)) nil)
|   completion--field-metadata(5)
|   completion--do-completion()
|   minibuffer-complete()
|   call-interactively(minibuffer-complete)
|   #[1028 
"
\304\305\211\306%\305\262\305\262\307\310\311#\210\n\203,\312\313!\210pF\314\315\316\317\320\321!\322\"\323\324%DC\216\325\326!+\207"
 [minibuffer-completion-predicate minibuffer-completion-table 
completion-in-region-mode-predicate completion-in-region--data make-overlay nil 
t overlay-put field completion completion-in-region-mode 1 funcall 
make-byte-code 0 "\301\300!\207" vconcat vector [delete-overlay] 2 "\n\n(fn)" 
call-interactively minibuffer-complete] 14 "\n\n(fn START END COLLECTION 
PREDICATE)"](5 15 (closure (t) (&rest args) (apply (quote 
completion-table-case-fold) (quote (#("Cubizolles Julien <address@hidden>" 0 17 
(org-category "contacts" fontified nil)))) args)) nil)
|   apply(#[1028 
"
\304\305\211\306%\305\262\305\262\307\310\311#\210\n\203,\312\313!\210pF\314\315\316\317\320\321!\322\"\323\324%DC\216\325\326!+\207"
 [minibuffer-completion-predicate minibuffer-completion-table 
completion-in-region-mode-predicate completion-in-region--data make-overlay nil 
t overlay-put field completion completion-in-region-mode 1 funcall 
make-byte-code 0 "\301\300!\207" vconcat vector [delete-overlay] 2 "\n\n(fn)" 
call-interactively minibuffer-complete] 14 "\n\n(fn START END COLLECTION 
PREDICATE)"] (5 15 (closure (t) (&rest args) (apply (quote 
completion-table-case-fold) (quote (#("Cubizolles Julien <address@hidden>" 0 17 
(org-category "contacts" fontified nil)))) args)) nil))
|   #[771 
":address@hidden@\302A\"address@hidden"\314\315%A##\207\304\316\"\207" [(#0) 
t append nil apply apply-partially make-byte-code 642 "address@hidden" vconcat 
vector [] 7 "\n\n(fn FUNS GLOBAL &rest ARGS)" #[1028 
"
\304\305\211\306%\305\262\305\262\307\310\311#\210\n\203,\312\313!\210pF\314\315\316\317\320\321!\322\"\323\324%DC\216\325\326!+\207"
 [minibuffer-completion-predicate minibuffer-completion-table 
completion-in-region-mode-predicate completion-in-region--data make-overlay nil 
t overlay-put field completion completion-in-region-mode 1 funcall 
make-byte-code 0 "\301\300!\207" vconcat vector [delete-overlay] 2 "\n\n(fn)" 
call-interactively minibuffer-complete] 14 "\n\n(fn START END COLLECTION 
PREDICATE)"]] 12 "\n\n(fn FUNS GLOBAL ARGS)"](nil nil (5 15 (closure (t) (&rest 
args) (apply (quote completion-table-case-fold) (quote (#("Cubizolles Julien 
<address@hidden>" 0 17 (org-category "contacts" fontified nil)))) args)) nil))
|   completion-in-region(5 15 (closure (t) (&rest args) (apply (quote 
completion-table-case-fold) (quote (#("Cubizolles Julien <address@hidden>" 0 17 
(org-category "contacts" fontified nil)))) args)) nil)
|   completion-at-point()
|   message-tab()
|   call-interactively(message-tab nil nil)
`----