Use appropriate message-narrow-* variant (again)

This should have been done as part of 9faded3 (Use appropriate
message-narrow-* variant, 2020-06-06).

1 files changed, 1 insertions, 1 deletions

diff --git a/piem.el b/piem.el
index 65310e4..a757092 100644
--- a/piem.el
+++ b/piem.el
@@ -244,7 +244,7 @@ intended to be used by libraries implementing a function for
 `piem-get-mid-functions'."
   (pcase-let ((`(,listid ,to ,cc)
                (save-restriction
-                 (message-narrow-to-headers)
+                 (message-narrow-to-head)
                  (list (message-fetch-field "list-id")
                        (message-fetch-field "to")
                        (message-fetch-field "cc")))))