Mercurial > hg > xemacs
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)