• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.9.5/emacs-92/emacs/lisp/gnus/

Lines Matching +defs:cc +defs:list

52 ;; imap-mailbox-rename,    imap-mailbox-lsub,        imap-mailbox-list
59 ;; imap-current-message, imap-list-to-message-set,
64 ;; imap-message-envelope-cc, imap-message-envelope-bcc
105 ;; (imap-mailbox-list "INBOX.n%")
127 ;; o Accept list of articles instead of message set string in most
180 the list is tried until a successful connection is made."
184 (defcustom imap-gssapi-program (list
193 the list is tried until a successful connection is made."
201 "A string, or list of strings, containing commands for SSL connections.
204 stdin and return responses to stdout. Each entry in the list is tried
214 "A list of strings, containing commands for IMAP connection.
218 and write IMAP response to stdout. Each entry in the list is tried
419 Each element is a list with four elements; tag (a integer), response
648 (list imap-ssl-program)))
751 (list imap-shell-program)))
904 (list
953 (list
1135 "Return a list of identifiers which server in BUFFER support.
1192 "Map a function across each mailbox in `imap-mailbox-data', returning a list.
1292 (imap-ok-p (imap-send-command-wait (list "CREATE \"" mailbox "\""))))
1306 (imap-send-command-wait (list "DELETE \"" mailbox "\""))))))
1315 (imap-send-command-wait (list "RENAME \"" oldname "\" "
1319 "Return a list of subscribed mailboxes on server in BUFFER.
1320 If ROOT is non-nil, only list matching mailboxes. If ADD-DELIMITER is
1328 ;; clear list data (NB not delimiter and other stuff)
1342 (defun imap-mailbox-list (root &optional reference add-delimiter buffer)
1343 "Return a list of mailboxes matching ROOT on server in BUFFER.
1346 passed to list command."
1352 ;; clear list data (NB not delimiter and other stuff)
1354 (imap-mailbox-put 'list nil mailbox)))
1362 (when (imap-mailbox-get-1 'list mailbox)
1384 ITEMS can be a symbol or a list of symbols, valid symbols are one of
1386 or 'unseen. If ITEMS is a list of symbols, a list of values is
1390 (imap-send-command-wait (list "STATUS \""
1397 (list items)))))))
1406 ITEMS can be a symbol or a list of symbols, valid symbols are one of
1410 (imap-send-command (list "STATUS \""
1416 (list items)))))))
1423 (imap-send-command-wait (list "GETACL \""
1433 (imap-send-command-wait (list "SETACL \""
1445 (imap-send-command-wait (list "DELETEACL \""
1458 (defun imap-list-to-message-set (list)
1461 (if (listp list)
1462 list
1463 (list list))
1474 (list range) ;; make (1 . 2) into ((1 . 2))
1482 (imap-list-to-message-set uids)
1488 UIDS can be a string, number or a list of numbers. If RECEIVE
1494 (imap-list-to-message-set uids)
1524 "Map a function across each mailbox in `imap-message-data', returning a list."
1557 (defmacro imap-message-envelope-cc (uid &optional buffer)
1616 (list (nth 0 (imap-mailbox-get-1 'copyuid mailbox))
1624 (list (imap-mailbox-get-1 'uidvalidity mailbox)
1639 non-nil, it will not create a mailbox. On success, return a list with
1641 first element, rest of list contain the saved articles' UIDs."
1668 (list (imap-mailbox-get-1 'uidvalidity mailbox)
1689 (list "APPEND \"" mailbox "\" " article))))
1721 (setq imap-callbacks (append (list (cons tag func)) imap-callbacks)))
1735 (if (not (listp command)) (setq command (list command)))
1950 ;; atom-specials = "(" / ")" / "{" / SP / CTL / list-wildcards /
1953 ;; list-wildcards = "%" / "*"
2003 ;; address-list = "(" 1*address ")" / nil
2007 (defsubst imap-parse-address-list ()
2020 ;; (assert (imap-parse-nil) t "In imap-parse-address-list")
2073 ;; mailbox-data = "FLAGS" SP flag-list /
2074 ;; "LIST" SP mailbox-list /
2075 ;; "LSUB" SP mailbox-list /
2087 ;; ; compatibility MUST list "IMAP4" as the first
2104 (FLAGS (imap-mailbox-put 'flags (imap-parse-flag-list)))
2105 (LIST (imap-parse-data-list 'list))
2106 (LSUB (imap-parse-data-list 'lsub))
2141 (push (list token status code text)
2153 (push (list token status code text) imap-failed-tags)
2232 (imap-mailbox-put 'permanentflags (imap-parse-flag-list)))
2251 (list (match-string 1)
2255 (imap-mailbox-put 'copyuid (list (match-string 1)
2263 ;; mailbox-list = "(" [mbx-list-flags] ")" SP
2266 ;; mbx-list-flags = *(mbx-list-oflag SP) mbx-list-sflag
2267 ;; *(SP mbx-list-oflag) /
2268 ;; mbx-list-oflag *(SP mbx-list-oflag)
2270 ;; mbx-list-oflag = "\Noinferiors" / flag-extension
2273 ;; mbx-list-sflag = "\Noselect" / "\Marked" / "\Unmarked"
2281 (defun imap-parse-data-list (type)
2283 (setq flags (imap-parse-flag-list))
2289 (imap-mailbox-put 'list-flags flags mailbox)
2314 (defsubst imap-parse-header-list ()
2328 (mapconcat 'identity (cons section (imap-parse-header-list)) " ")
2345 (setq flags (imap-parse-flag-list))
2362 (push (list
2441 (setq acl (append acl (list (cons identifier rights)))))
2444 ;; flag-list = "(" [flag *(SP flag)] ")"
2460 (defun imap-parse-flag-list ()
2461 (let (flag-list start)
2462 (assert (eq (char-after) ?\() nil "In imap-parse-flag-list")
2470 (push (buffer-substring start (point)) flag-list))
2471 (assert (eq (char-after) ?\)) nil "In imap-parse-flag-list")
2473 (nreverse flag-list)))
2476 ;; env-reply-to SP env-to SP env-cc SP env-bcc SP
2481 ;; env-cc = "(" 1*address ")" / nil
2506 (prog1 (imap-parse-address-list) ;; from
2508 (prog1 (imap-parse-address-list) ;; sender
2510 (prog1 (imap-parse-address-list) ;; reply-to
2512 (prog1 (imap-parse-address-list) ;; to
2514 (prog1 (imap-parse-address-list) ;; cc
2516 (prog1 (imap-parse-address-list) ;; bcc
2525 (defsubst imap-parse-string-list ()
2582 (push (imap-parse-string-list) dsp)
2591 (push (imap-parse-string-list) ext)
2678 (push (imap-parse-string-list) body)
2693 (push (imap-parse-string-list) body)
2796 imap-mailbox-list
2804 imap-list-to-message-set
2833 imap-parse-data-list
2837 imap-parse-flag-list