Mercurial > emacs
comparison lisp/gnus/gnus-score.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 | fafd692d1e40 |
children | 9082bf778ad8 ee12d75eb214 |
comparison
equal
deleted
inserted
replaced
65681:4312387e37c8 | 65682:c16795de963a |
---|---|
650 (and gnus-extra-headers | 650 (and gnus-extra-headers |
651 (equal (nth 1 entry) "extra") | 651 (equal (nth 1 entry) "extra") |
652 (intern ; need symbol | 652 (intern ; need symbol |
653 (gnus-completing-read-with-default | 653 (gnus-completing-read-with-default |
654 (symbol-name (car gnus-extra-headers)) ; default response | 654 (symbol-name (car gnus-extra-headers)) ; default response |
655 "Score extra header:" ; prompt | 655 "Score extra header" ; prompt |
656 (mapcar (lambda (x) ; completion list | 656 (mapcar (lambda (x) ; completion list |
657 (cons (symbol-name x) x)) | 657 (cons (symbol-name x) x)) |
658 gnus-extra-headers) | 658 gnus-extra-headers) |
659 nil ; no completion limit | 659 nil ; no completion limit |
660 t)))) ; require match | 660 t)))) ; require match |