mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-02-06 20:49:33 +00:00
(mc-pgp-always-sign): Add defvar.
This commit is contained in:
parent
12710ba4d4
commit
4ae9592bc0
@ -32,6 +32,8 @@
|
||||
(require 'cl)
|
||||
(require 'mm-util))
|
||||
|
||||
(defvar mc-pgp-always-sign)
|
||||
|
||||
(autoload 'quoted-printable-decode-region "qp")
|
||||
(autoload 'quoted-printable-encode-region "qp")
|
||||
|
||||
@ -182,7 +184,7 @@
|
||||
(delete-region (point-min) (point)))
|
||||
(mm-with-unibyte-current-buffer
|
||||
(with-temp-buffer
|
||||
(flet ((gpg-encrypt-func
|
||||
(flet ((gpg-encrypt-func
|
||||
(sign plaintext ciphertext result recipients &optional
|
||||
passphrase sign-with-key armor textmode)
|
||||
(if sign
|
||||
@ -270,7 +272,7 @@
|
||||
(delete-region (point-min) (point)))
|
||||
(mm-decode-content-transfer-encoding cte)
|
||||
(unless (pgg-encrypt-region
|
||||
(point-min) (point-max)
|
||||
(point-min) (point-max)
|
||||
(split-string
|
||||
(or
|
||||
(message-options-get 'message-recipients)
|
||||
|
@ -35,6 +35,8 @@
|
||||
(require 'mm-util)
|
||||
(require 'mml)
|
||||
|
||||
(defvar mc-pgp-always-sign)
|
||||
|
||||
(defvar mml2015-use (or
|
||||
(progn
|
||||
(ignore-errors
|
||||
|
Loading…
x
Reference in New Issue
Block a user