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

index 351e3dd..4a93efb 100644 (file)
          (condition-case error
              (setq string (epg-decrypt-string
                            context
-                           (riece-decode-coding-string
-                            (base64-decode-string string))))
+                           (base64-decode-string string)))
            (error
             (if (setq entry (assoc (riece-message-target message)
                                    riece-epg-passphrase-alist))
                 (setcdr entry nil))
             (message "%s" (cdr error))))
-         (riece-message-set-text message string))))
+         (riece-message-set-text message
+                                 (riece-decode-coding-string string)))))
   message)
 
 (defun riece-epg-insinuate ()