Yet another bug (was: PGP from evolution)

[Ivan Boldyrev <boldyrev+nospam@cgitftp.uiggm.nsc.ru>]

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

My previous post displayed yet another bug in mml1991-pgg-sign:
quoted-printable-decode-region is called always even if region was not
actually encoded.

Peace of text about quoted-printable shoul look like:

,----[ <ds9ob1x1o4.ln2@ibhome.cgitftp.uiggm.nsc.ru> ]
| Gnus encrypts Cyrillic (8-bit) messages incorrectly: it encodes it
| with quoted-printable.  It is correct for PGP/MIME but wrong for Plain
| PGP.  For example, when someone with PGP-incapable client (Outgluk,
| for example) will decode it manually and see something like
| 
| =FB=C9=C6=D2=CF=D7=C1=CE=C9=C5 =D2=D5=D3=D3=CB=CF=C7=CF.
| 
| he will not be pleased.
`----


Here is a patch: :)

- --- mml1991.el~ 2003-12-24 17:50:16.000000000 +0600
+++ mml1991.el  2003-12-24 17:49:16.000000000 +0600
@@ -232,7 +232,9 @@
       (setq headers (buffer-substring (point-min) (point)))
       (forward-line) ;; skip header/body separator
       (delete-region (point-min) (point)))
- -    (quoted-printable-decode-region (point-min) (point-max))
+    (when (string-match "^Content-Transfer-Encoding:
quoted-printable"
+                           headers)
+      (quoted-printable-decode-region (point-min) (point-max)))
     (unless (let ((pgg-default-user-id
                   (or (message-options-get 'mml-sender)
                       pgg-default-user-id)))

- -- 
Ivan Boldyrev

                                                  Is 'morning' a gerund?
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.3.4 (GNU/Linux)

iD8DBQE/6X6Cpb3RmFYJhnMRAocQAJ9joo7QmgKFfEtBXQRhG6whYx52uwCgsFiO
1oev0ZCG/Qk1T5cYEFlqAr0=
=B3FV
-----END PGP SIGNATURE-----