X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Friece-epg.el;h=55d2083e5ba9583052db7b0b87983b2c57026c5f;hb=f8794eaa3bb1cf94421d2b2f3d9da2aed7a59f15;hp=6f19efc7dc51f8120d39c841f242bb9c25ad2bd4;hpb=7ca27e3d719a97bdec80bbb8d88dba61ea0fe505;p=elisp%2Friece.git

diff --git a/lisp/riece-epg.el b/lisp/riece-epg.el
index 6f19efc..55d2083 100644
--- a/lisp/riece-epg.el
+++ b/lisp/riece-epg.el
@@ -108,7 +108,7 @@
 	      t)))
     (riece-display-message
      (riece-make-message (riece-current-nickname) riece-current-channel
-			 string nil t))
+			 (concat "[decrypted:" string "]") nil t))
     (let ((next-line-add-newlines t))
       (next-line 1))))
 
@@ -172,7 +172,8 @@
 	      0 (length (riece-message-text message))
 	      'riece-epg-encryption-target (riece-message-target message)
 	      (riece-message-text message))
-	     (message "%s" (cdr error)))))))
+	     (if riece-debug
+		 (message "Couldn't decrypt: %s" (cdr error))))))))
   message)
 
 (defun riece-epg-add-encrypted-button (start end)