changeset 88325:f4e367893df9

(rmail-read-label): Since rmail-keywords is a list of symbols, we need to transform it into an alist for completion.
author Alex Schroeder <alex@gnu.org>
date Thu, 02 Mar 2006 20:06:15 +0000
parents f2334bdf1c2e
children f88759c22fd5
files lisp/mail/rmailkwd.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/mail/rmailkwd.el	Wed Mar 01 07:18:39 2006 +0000
+++ b/lisp/mail/rmailkwd.el	Thu Mar 02 20:06:15 2006 +0000
@@ -137,7 +137,8 @@
 		       (concat prompt (if rmail-last-label
 					  (concat " (default " default "): ")
 					": "))
-		       rmail-keywords nil nil nil nil default)))))
+		       (mapcar 'list rmail-keywords)
+		       nil nil nil nil default)))))
       (setq rmail-last-label (rmail-make-label result t))
       ;; return the string, not the symbol
       result)))