Mercurial > emacs
comparison lisp/gnus/mm-view.el @ 65682:c16795de963a
2005-09-24 Emilio C. Lopes <eclig@gmx.net>
* smime.el (smime-sign-buffer, smime-decrypt-buffer):
* mm-view.el (mm-view-pkcs7-decrypt):
* gnus-sum.el (gnus-summary-limit-to-extra)
(gnus-summary-respool-article, gnus-read-move-group-name):
* gnus-score.el (gnus-summary-increase-score):
* gnus-util.el (gnus-completing-read-with-default):
* gnus-art.el (gnus-read-save-file-name)
(gnus-summary-save-in-rmail, gnus-summary-save-in-mail)
(gnus-summary-save-in-file, gnus-summary-save-body-in-file):
* message.el (message-check-news-header-syntax):
Follow convention for reading with the minibuffer.
author | Romain Francoise <romain@orebokech.com> |
---|---|
date | Sat, 24 Sep 2005 13:46:20 +0000 |
parents | 45be648405bb |
children | 5265a4059126 ee12d75eb214 |
comparison
equal
deleted
inserted
replaced
65681:4312387e37c8 | 65682:c16795de963a |
---|---|
574 (point-min) (point-max) | 574 (point-min) (point-max) |
575 (if (= (length smime-keys) 1) | 575 (if (= (length smime-keys) 1) |
576 (cadar smime-keys) | 576 (cadar smime-keys) |
577 (smime-get-key-by-email | 577 (smime-get-key-by-email |
578 (gnus-completing-read-maybe-default | 578 (gnus-completing-read-maybe-default |
579 (concat "Decipher using which key? " | 579 (concat "Decipher using key" |
580 (if smime-keys (concat "(default " (caar smime-keys) ") ") | 580 (if smime-keys |
581 "")) | 581 (concat " (default " (caar smime-keys) "): ") |
582 ": ")) | |
582 smime-keys nil nil nil nil (car-safe (car-safe smime-keys)))))) | 583 smime-keys nil nil nil nil (car-safe (car-safe smime-keys)))))) |
583 (goto-char (point-min)) | 584 (goto-char (point-min)) |
584 (while (search-forward "\r\n" nil t) | 585 (while (search-forward "\r\n" nil t) |
585 (replace-match "\n")) | 586 (replace-match "\n")) |
586 (goto-char (point-min))) | 587 (goto-char (point-min))) |