David Maus wrote: >Looking at the source (tm) of elmo-imap4.el suggests that a negated >search for messages is not (yet) supported. >Can anyone confirm this? Yes, it's right there in elmo-imap4.el: ,---- | (defun elmo-imap4-search-internal-primitive (folder session filter from-msgs) | (let ((search-key (elmo-filter-key filter)) | (imap-search-keys '("bcc" "body" "cc" "from" "subject" "to" | "larger" "smaller" "flag")) | (total 0) | (length (length from-msgs)) | charset set-list end results) | (cond | [...] | ((string= "flag" search-key) | (elmo-imap4-folder-list-flagged | folder (intern (elmo-filter-value filter)))) | [...] `---- Only the filter value (i.e. the flag) is passed to `elmo-imap4-folder-list-flagged', the filter type ('unmatch for a negated search) is silenty dropped. Attached fixes this glitch by - modifying `elmo-imap4-folder-list-flagged' to take a optional argument TYPE for the filter type and prefixes the search condition with a "not " if TYPE is 'unmatch. - passing the filter type to `elmo-imap4-folder-list-flagged' in `elmo-imap4-search-internal-primitive' HTH -- David -- OpenPGP... 0x99ADB83B5A4478E6 Jabber.... dmjena@jabber.org Email..... dmaus@ictsoc.de
Attachment:
fix-573726.diff
Description: Binary data
Attachment:
pgp7gJO6_ebvP.pgp
Description: PGP signature