diff options
| author | Chong Yidong | 2009-01-22 04:50:27 +0000 |
|---|---|---|
| committer | Chong Yidong | 2009-01-22 04:50:27 +0000 |
| commit | f1f2094bb476f00d8eb085f89bee6c4c3463af69 (patch) | |
| tree | c5ea0e5a555cb52eb3269444463d2f9bba5f1d81 | |
| parent | 9bef3784e907d40587d6b72fb339740538ef5a01 (diff) | |
| download | emacs-f1f2094bb476f00d8eb085f89bee6c4c3463af69.tar.gz emacs-f1f2094bb476f00d8eb085f89bee6c4c3463af69.zip | |
(pmail-cease-edit, pmail-edit-mode): Use pmail-buffer-swapped.
| -rw-r--r-- | lisp/mail/pmailedit.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/pmailedit.el b/lisp/mail/pmailedit.el index 85425f658b3..0529024ea5d 100644 --- a/lisp/mail/pmailedit.el +++ b/lisp/mail/pmailedit.el | |||
| @@ -65,7 +65,7 @@ This functions runs the normal hook `pmail-edit-mode-hook'. | |||
| 65 | (save-excursion | 65 | (save-excursion |
| 66 | (set-buffer pmail-summary-buffer) | 66 | (set-buffer pmail-summary-buffer) |
| 67 | (pmail-summary-disable))) | 67 | (pmail-summary-disable))) |
| 68 | (let (buffer-swapped-with) | 68 | (let (pmail-buffer-swapped) |
| 69 | ;; Prevent change-major-mode-hook from unswapping the buffers. | 69 | ;; Prevent change-major-mode-hook from unswapping the buffers. |
| 70 | (delay-mode-hooks (text-mode)) | 70 | (delay-mode-hooks (text-mode)) |
| 71 | (use-local-map pmail-edit-map) | 71 | (use-local-map pmail-edit-map) |
| @@ -128,7 +128,7 @@ This functions runs the normal hook `pmail-edit-mode-hook'. | |||
| 128 | headers-end) | 128 | headers-end) |
| 129 | ;; Go back to Pmail mode, but carefully. | 129 | ;; Go back to Pmail mode, but carefully. |
| 130 | (force-mode-line-update) | 130 | (force-mode-line-update) |
| 131 | (let (buffer-swapped-with) | 131 | (let (pmail-buffer-swapped) |
| 132 | (kill-all-local-variables) | 132 | (kill-all-local-variables) |
| 133 | (pmail-mode-1) | 133 | (pmail-mode-1) |
| 134 | (if (boundp 'tool-bar-map) | 134 | (if (boundp 'tool-bar-map) |