[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
bug#35113: 27.0.50; key handling bug
From: |
Richard Stallman |
Subject: |
bug#35113: 27.0.50; key handling bug |
Date: |
Mon, 26 Aug 2019 19:16:15 -0400 |
[[[ To any NSA and FBI agents reading my email: please consider ]]]
[[[ whether defending the US Constitution against all enemies, ]]]
[[[ foreign or domestic, requires you to follow Snowden's example. ]]]
I run this command, which is in my .emacs
and invokes standard parts of Emacs,
(defun epenc (&optional arg)
(interactive "P")
(unless arg
(mail-cc-me))
(mail-text)
;; Record the plaintext so we can save it when message is sent.
(make-local-variable 'buffer-plaintext)
(setq buffer-plaintext (buffer-string))
(let (message)
(when (looking-at "[[]+ To any")
(let ((beg (point)))
(while (looking-at "[[]+ \\|$")
(forward-line 1))
(setq message (buffer-substring beg (point)))
(delete-region beg (point))))
(epa-mail-encrypt)
(when message
(mail-text)
(insert message))))
--
Dr Richard Stallman
President, Free Software Foundation (https://gnu.org, https://fsf.org)
Internet Hall-of-Famer (https://internethalloffame.org)