[Emacs-diffs] Changes to emacs/lisp/gnus/mm-view.el

[Romain Francoise]

Index: emacs/lisp/gnus/mm-view.el
diff -c emacs/lisp/gnus/mm-view.el:1.17 emacs/lisp/gnus/mm-view.el:1.18
*** emacs/lisp/gnus/mm-view.el:1.17     Fri Sep  9 01:47:33 2005
--- emacs/lisp/gnus/mm-view.el  Sat Sep 24 13:46:19 2005
***************
*** 576,584 ****
         (cadar smime-keys)
       (smime-get-key-by-email
        (gnus-completing-read-maybe-default
!        (concat "Decipher using which key? "
!              (if smime-keys (concat "(default " (caar smime-keys) ") ")
!                ""))
         smime-keys nil nil nil nil (car-safe (car-safe smime-keys))))))
    (goto-char (point-min))
    (while (search-forward "\r\n" nil t)
--- 576,585 ----
         (cadar smime-keys)
       (smime-get-key-by-email
        (gnus-completing-read-maybe-default
!        (concat "Decipher using key"
!              (if smime-keys
!                  (concat " (default " (caar smime-keys) "): ")
!                ": "))
         smime-keys nil nil nil nil (car-safe (car-safe smime-keys))))))
    (goto-char (point-min))
    (while (search-forward "\r\n" nil t)