[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/net/imap.el,v
From: |
Miles Bader |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/net/imap.el,v |
Date: |
Thu, 06 Dec 2007 00:21:08 +0000 |
CVSROOT: /cvsroot/emacs
Module name: emacs
Changes by: Miles Bader <miles> 07/12/06 00:21:02
Index: lisp/net/imap.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/net/imap.el,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- lisp/net/imap.el 29 Nov 2007 04:29:07 -0000 1.2
+++ lisp/net/imap.el 6 Dec 2007 00:20:59 -0000 1.3
@@ -1533,10 +1533,11 @@
(imap-send-command (list "STATUS \""
(imap-utf7-encode mailbox)
"\" "
+ (upcase
(format "%s"
(if (listp items)
items
- (list items)))))))
+ (list items))))))))
(defun imap-mailbox-acl-get (&optional mailbox buffer)
"Get ACL on mailbox from server in BUFFER."
@@ -2524,7 +2525,7 @@
(while (and (not (eq (char-after) ?\)))
(or (forward-char) t)
(looking-at "\\([A-Za-z]+\\) "))
- (let ((token (match-string 1)))
+ (let ((token (upcase (match-string 1))))
(goto-char (match-end 0))
(cond ((string= token "MESSAGES")
(imap-mailbox-put 'messages (read (current-buffer)) mailbox))
- [Emacs-diffs] Changes to emacs/lisp/net/imap.el,v,
Miles Bader <=