1977 |
(when (eq (char-after) ?\)) |
(when (eq (char-after) ?\)) |
1978 |
(imap-forward) |
(imap-forward) |
1979 |
(nreverse addresses))) |
(nreverse addresses))) |
1980 |
(assert (imap-parse-nil) t "In imap-parse-address-list"))) |
;; With assert, the code might not be eval'd. |
1981 |
|
;; (assert (imap-parse-nil) t "In imap-parse-address-list") |
1982 |
|
(imap-parse-nil))) |
1983 |
|
|
1984 |
;; mailbox = "INBOX" / astring |
;; mailbox = "INBOX" / astring |
1985 |
;; ; INBOX is case-insensitive. All case variants of |
;; ; INBOX is case-insensitive. All case variants of |
2542 |
(imap-forward) |
(imap-forward) |
2543 |
(push (imap-parse-string-list) dsp) |
(push (imap-parse-string-list) dsp) |
2544 |
(imap-forward)) |
(imap-forward)) |
2545 |
(assert (imap-parse-nil) t "In imap-parse-body-ext")) |
;; With assert, the code might not be eval'd. |
2546 |
|
;; (assert (imap-parse-nil) t "In imap-parse-body-ext") |
2547 |
|
(imap-parse-nil)) |
2548 |
(push (nreverse dsp) ext)) |
(push (nreverse dsp) ext)) |
2549 |
(when (eq (char-after) ?\ ) ;; body-fld-lang |
(when (eq (char-after) ?\ ) ;; body-fld-lang |
2550 |
(imap-forward) |
(imap-forward) |