diff options
| -rw-r--r-- | lisp/gnus/mail-source.el | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lisp/gnus/mail-source.el b/lisp/gnus/mail-source.el index a6be19cfae2..62cff03e8e6 100644 --- a/lisp/gnus/mail-source.el +++ b/lisp/gnus/mail-source.el | |||
| @@ -168,13 +168,16 @@ See Info node `(gnus)Mail Source Specifiers'." | |||
| 168 | ,@mail-source-imap-authenticators)) | 168 | ,@mail-source-imap-authenticators)) |
| 169 | (group :inline t | 169 | (group :inline t |
| 170 | (const :format "" :value :mailbox) | 170 | (const :format "" :value :mailbox) |
| 171 | (string :tag "Mailbox")) | 171 | (string :tag "Mailbox" |
| 172 | :value "INBOX")) | ||
| 172 | (group :inline t | 173 | (group :inline t |
| 173 | (const :format "" :value :predicate) | 174 | (const :format "" :value :predicate) |
| 174 | (function :tag "Predicate")) | 175 | (string :tag "Predicate" |
| 176 | :value "UNSEEN UNDELETED")) | ||
| 175 | (group :inline t | 177 | (group :inline t |
| 176 | (const :format "" :value :fetchflag) | 178 | (const :format "" :value :fetchflag) |
| 177 | (string :tag "Fetchflag")) | 179 | (string :tag "Fetchflag" |
| 180 | :value "\\Deleted")) | ||
| 178 | (group :inline t | 181 | (group :inline t |
| 179 | (const :format "" | 182 | (const :format "" |
| 180 | :value :dontexpunge) | 183 | :value :dontexpunge) |