Fixed decoding.
authorueno <ueno>
Tue, 25 Apr 2006 09:03:26 +0000 (09:03 +0000)
committerueno <ueno>
Tue, 25 Apr 2006 09:03:26 +0000 (09:03 +0000)
lisp/riece-epg.el

index 542bcd2..5ddb31d 100644 (file)
               message
               (concat
                "[OpenPGP Decrypted:"
-               (decode-coding-string
-                (epg-decrypt-string context (base64-decode-string string))
-                (if (consp coding-system)
-                    (car coding-system)
-                  coding-system))
+               (riece-with-server-buffer
+                   (riece-identity-server (riece-message-target message))
+                 (decode-coding-string
+                  (epg-decrypt-string context (base64-decode-string string))
+                  (if (consp coding-system)
+                      (car coding-system)
+                    coding-system)))
                "]"))
            (error
             (if (setq entry (riece-identity-assoc