get subject and from on wl-biff-notify-hook function

[email protected] Wed, 24 Jul 2019 17:42:05 +0000
Newsgroups gmane.mail.wanderlust.general.japanese
Message-ID <[email protected]>
Hi.

I have a notification function that advertises me about new email. But I
have more than one email account. I would like to be notified with the
account, sender, and subject.

my notify function is this one
--8<---------------cut here---------------start------------->8---
(defun my-wk/wl-biff-notify()
  (let ((user-home-dir (getenv "HOME")))
    (ding);; be sure it works
    (when (fboundp 'notifications-notify)
      (setq my-wl-dbus-id (notifications-notify :title "wl-mail-kipu"
                                                :bus (if (boundp 'my-dbus-address) my-dbus-address)
                                                :body "new mail!"
                                                :sound-file (concat user-home-dir "/downloads/KDE-Im-New-Mail.ogg")
                                                :app-icon (concat user-home-dir "/downloads/mail-unread.png")
                                                :replaces-id (if (boundp 'my-wl-dbus-id) my-wl-dbus-id)
                                                :timeout 1))
      (if (file-exists-p (concat user-home-dir "/downloads/KDE-Im-New-Mail.au"))
          (play-sound-file (concat user-home-dir "/downloads/KDE-Im-New-Mail.au"))
        (message (concat "file not present " (concat user-home-dir "/downloads/KDE-Im-New-Mail.au")))
        )
      )
    ))
--8<---------------cut here---------------end--------------->8---

But I also have this var:
--8<---------------cut here---------------start------------->8---
      (setq
wl-biff-check-folder-list '(".INBOX" ".~/Maildir-fm/INBOX" ".~/Maildir-gm/INBOX" ".~/Maildir-kipu/INBOX") ;; chk
)
--8<---------------cut here---------------end--------------->8---

Could It be possible?. navigating this list 'wl-biff-check-folder-list'
and check on every folder for displaying individual notifications with
every mail message?

AR