Mercurial > emacs
comparison lisp/gnus/nnimap.el @ 110804:30fed27e97bc
Merge changes made in Gnus trunk.
nnimap.el (nnimap-request-rename-group): Add this method.
shr.el: Keep track of the natural width of TD elements, so we know which ones to expand.
shr.el: Expand TD elements to fill available space.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Thu, 07 Oct 2010 11:46:01 +0000 |
| parents | 1f25b03df4ad |
| children | 07053df95af6 |
comparison
equal
deleted
inserted
replaced
| 110803:e5dfbfe93896 | 110804:30fed27e97bc |
|---|---|
| 650 (deffoo nnimap-request-delete-group (group &optional force server) | 650 (deffoo nnimap-request-delete-group (group &optional force server) |
| 651 (when (nnimap-possibly-change-group nil server) | 651 (when (nnimap-possibly-change-group nil server) |
| 652 (with-current-buffer (nnimap-buffer) | 652 (with-current-buffer (nnimap-buffer) |
| 653 (car (nnimap-command "DELETE %S" (utf7-encode group t)))))) | 653 (car (nnimap-command "DELETE %S" (utf7-encode group t)))))) |
| 654 | 654 |
| 655 (deffoo nnimap-request-rename-group (group new-name &optional server) | |
| 656 (when (nnimap-possibly-change-group nil server) | |
| 657 (with-current-buffer (nnimap-buffer) | |
| 658 (car (nnimap-command "RENAME %S %S" (utf7-encode group t) (utf7-encode new-name t)))))) | |
| 659 | |
| 655 (deffoo nnimap-request-expunge-group (group &optional server) | 660 (deffoo nnimap-request-expunge-group (group &optional server) |
| 656 (when (nnimap-possibly-change-group group server) | 661 (when (nnimap-possibly-change-group group server) |
| 657 (with-current-buffer (nnimap-buffer) | 662 (with-current-buffer (nnimap-buffer) |
| 658 (car (nnimap-command "EXPUNGE"))))) | 663 (car (nnimap-command "EXPUNGE"))))) |
| 659 | 664 |