From 983e7375af65594411c842503e1a8e46086df50b Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Sat, 6 Aug 2022 20:17:37 +0100
Subject: gnus: simpler open email function

---
 attic/misc.el | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'attic')

diff --git a/attic/misc.el b/attic/misc.el
index 9c3488f..a26f130 100644
--- a/attic/misc.el
+++ b/attic/misc.el
@@ -205,6 +205,13 @@
 
 (add-hook 'gnus-part-display-hook 'jao-gnus-remove-anchors)
 
+;;;; find message id
+(defun jao-gnus-file-message-id (filename)
+  (with-temp-buffer
+    (insert-file filename)
+    (goto-char (point-min))
+    (when (re-search-forward "^[Mm]essage-[Ii][Dd]: <?\\([^><]+\\)>?" nil t)
+      (match-string 1))))
 ;;; mu4e
 (jao-load-path "mu4e")
 (use-package mu4e
-- 
cgit v1.2.3