From c15ef3011e70b6981e16715bbaf82b7dc147e27a Mon Sep 17 00:00:00 2001
From: JSDurand <mmemmew@gmail.com>
Date: Wed, 21 Jul 2021 01:04:58 +0800
Subject: new: gnus treat article

gnus-conf.el (gnus-treat-repunctuate): Ensure that sentences end with
double spaces.

(gnus-part-display-hook): add the function to the hook.
---
 gnus-conf.el | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/gnus-conf.el b/gnus-conf.el
index 3775081..bbbd17a 100644
--- a/gnus-conf.el
+++ b/gnus-conf.el
@@ -15,6 +15,18 @@
         ;;  (nnimap-server-port 143))
         ))
 
+;; repunctuate sentences
+
+(add-hook 'gnus-part-display-hook 'gnus-treat-repunctuate)
+
+;;;###autoload
+(defun gnus-treat-repunctuate ()
+  "Do a quick repunctuation."
+  (interactive)
+  (save-excursion
+    (goto-char (point-min))
+    (repunctuate-sentences t)))
+
 ;; To be able to see the encrypted mails sent by me.
 
 (setq mml-secure-openpgp-encrypt-to-self t)
-- 
cgit v1.2.3-18-g5258