Icons not displayed when reading email

[nlamirault]

It seems this function does not work :

;;;###autoload
(defun all-the-icons-gnus-setup ()
  "Add icons for Gnus."
  (advice-add 'gnus-summary-next-article :after 'all-the-icons-gnus--add-faces)
  (all-the-icons-gnus--set-format))

The error :

Debugger entered--Lisp error: (wrong-number-of-arguments (0 . 0) 2)
  all-the-icons-gnus--add-faces(t nil)
  apply(all-the-icons-gnus--add-faces (t nil))
  gnus-summary-next-article(t nil)
  gnus-summary-next-unread-article()
  funcall-interactively(gnus-summary-next-unread-article)
  call-interactively(gnus-summary-next-unread-article nil nil)
  command-execute(gnus-summary-next-unread-article)