[elpa] externals/gnorb 67edd80 239/449: Use mail-header-references

[Stefan Monnier]

branch: externals/gnorb
commit 67edd80c97024d1679b7769d6f93c58387d12b7a
Author: Eric Abrahamsen <eric@ericabrahamsen.net>
Commit: Eric Abrahamsen <eric@ericabrahamsen.net>

    Use mail-header-references
    
    * gnorb-gnus.el (gnorb-gnus-incoming-do-todo): Why was I replicating
      mail-header-references (badly) myself?
---
 gnorb-gnus.el | 6 +-----
 1 file changed, 1 insertion(+), 5 deletions(-)

diff --git a/gnorb-gnus.el b/gnorb-gnus.el
index bd7a765..5ebb2b9 100644
--- a/gnorb-gnus.el
+++ b/gnorb-gnus.el
@@ -496,11 +496,7 @@ to t (it is, by default)."
         (group gnus-newsgroup-name)
         (link (call-interactively 'org-store-link))
         (org-refile-targets gnorb-gnus-trigger-refile-targets)
-        ;;
-        (ref-msg-ids
-         (with-current-buffer gnus-original-article-buffer
-           (message-narrow-to-headers-or-head)
-           (message-fetch-field "references")))
+        (ref-msg-ids (mail-header-references headers))
         (offer-heading
          (when (and (not id) ref-msg-ids gnorb-tracking-enabled)
            (if org-id-track-globally