[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/gnus/mm-view.el
From: |
Romain Francoise |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/gnus/mm-view.el |
Date: |
Sat, 24 Sep 2005 09:46:28 -0400 |
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)