projects
/
gnus
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of https://git.gnus.org/gnus
[gnus]
/
lisp
/
gnus-diary.el
diff --git
a/lisp/gnus-diary.el
b/lisp/gnus-diary.el
index
18130bb
..
c2b95c7
100644
(file)
--- a/
lisp/gnus-diary.el
+++ b/
lisp/gnus-diary.el
@@
-368,11
+368,11
@@
If ARG (or prefix) is non-nil, force prompting for all fields."
header ": ")))
(setq value
(if (listp (nth 1 head))
header ": ")))
(setq value
(if (listp (nth 1 head))
- (
completing-read prompt (cons '("*" nil) (nth 1 head
))
-
nil
t value
- gnus-diary-header-value-history)
+ (
gnus-completing-read prompt (cons "*" (mapcar 'car (nth 1 head)
))
+
t value
+
'
gnus-diary-header-value-history)
(read-string prompt value
(read-string prompt value
- gnus-diary-header-value-history))))
+
'
gnus-diary-header-value-history))))
(setq ask nil)
(setq invalid nil)
(condition-case ()
(setq ask nil)
(setq invalid nil)
(condition-case ()