diff options
| author | Juanma Barranquero | 2005-08-31 13:10:00 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2005-08-31 13:10:00 +0000 |
| commit | 4ae9592bc016517fc78d6fd58e428feff84bf68f (patch) | |
| tree | a30da90d77fa9b9fe8260b6d714b4c99ca67e7e2 | |
| parent | 12710ba4d4f1bae017e9538e5244b1c92636b499 (diff) | |
| download | emacs-4ae9592bc016517fc78d6fd58e428feff84bf68f.tar.gz emacs-4ae9592bc016517fc78d6fd58e428feff84bf68f.zip | |
(mc-pgp-always-sign): Add defvar.
| -rw-r--r-- | lisp/gnus/mml1991.el | 6 | ||||
| -rw-r--r-- | lisp/gnus/mml2015.el | 2 |
2 files changed, 6 insertions, 2 deletions
diff --git a/lisp/gnus/mml1991.el b/lisp/gnus/mml1991.el index fc6d9e8921d..932737dc4be 100644 --- a/lisp/gnus/mml1991.el +++ b/lisp/gnus/mml1991.el | |||
| @@ -32,6 +32,8 @@ | |||
| 32 | (require 'cl) | 32 | (require 'cl) |
| 33 | (require 'mm-util)) | 33 | (require 'mm-util)) |
| 34 | 34 | ||
| 35 | (defvar mc-pgp-always-sign) | ||
| 36 | |||
| 35 | (autoload 'quoted-printable-decode-region "qp") | 37 | (autoload 'quoted-printable-decode-region "qp") |
| 36 | (autoload 'quoted-printable-encode-region "qp") | 38 | (autoload 'quoted-printable-encode-region "qp") |
| 37 | 39 | ||
| @@ -182,7 +184,7 @@ | |||
| 182 | (delete-region (point-min) (point))) | 184 | (delete-region (point-min) (point))) |
| 183 | (mm-with-unibyte-current-buffer | 185 | (mm-with-unibyte-current-buffer |
| 184 | (with-temp-buffer | 186 | (with-temp-buffer |
| 185 | (flet ((gpg-encrypt-func | 187 | (flet ((gpg-encrypt-func |
| 186 | (sign plaintext ciphertext result recipients &optional | 188 | (sign plaintext ciphertext result recipients &optional |
| 187 | passphrase sign-with-key armor textmode) | 189 | passphrase sign-with-key armor textmode) |
| 188 | (if sign | 190 | (if sign |
| @@ -270,7 +272,7 @@ | |||
| 270 | (delete-region (point-min) (point))) | 272 | (delete-region (point-min) (point))) |
| 271 | (mm-decode-content-transfer-encoding cte) | 273 | (mm-decode-content-transfer-encoding cte) |
| 272 | (unless (pgg-encrypt-region | 274 | (unless (pgg-encrypt-region |
| 273 | (point-min) (point-max) | 275 | (point-min) (point-max) |
| 274 | (split-string | 276 | (split-string |
| 275 | (or | 277 | (or |
| 276 | (message-options-get 'message-recipients) | 278 | (message-options-get 'message-recipients) |
diff --git a/lisp/gnus/mml2015.el b/lisp/gnus/mml2015.el index 590e9276a0f..c8d46c99f51 100644 --- a/lisp/gnus/mml2015.el +++ b/lisp/gnus/mml2015.el | |||
| @@ -35,6 +35,8 @@ | |||
| 35 | (require 'mm-util) | 35 | (require 'mm-util) |
| 36 | (require 'mml) | 36 | (require 'mml) |
| 37 | 37 | ||
| 38 | (defvar mc-pgp-always-sign) | ||
| 39 | |||
| 38 | (defvar mml2015-use (or | 40 | (defvar mml2015-use (or |
| 39 | (progn | 41 | (progn |
| 40 | (ignore-errors | 42 | (ignore-errors |