diff mail-from-inf.el @ 61:963ac2f8e386

old local
author Henry S. Thompson <ht@inf.ed.ac.uk>
date Fri, 05 Apr 2024 10:13:30 +0100
parents eee08de75336
children
line wrap: on
line diff
--- a/mail-from-inf.el	Fri Apr 05 09:11:09 2024 +0100
+++ b/mail-from-inf.el	Fri Apr 05 10:13:30 2024 +0100
@@ -292,9 +292,14 @@
       (let ((sco (get-buffer "*Shell Command Output*")))
 	(if sco
 	    (kill-buffer sco)))
-      (gnus-edit-and-move-to-diary '(16 . t)))
+      (gnus-edit-and-move-to-diary_1 nil t))
     (gnus-summary-exit)
     )
   )
 
+(add-hook 'gnus-after-getting-new-news-hook
+ (lambda ()
+   (if (member "_diary" ht-gnus-just-read)
+       (straight-to-diary))))
+
 (provide 'mail-from-inf)