Mercurial > emacs
comparison lisp/mail/rmailedit.el @ 76106:1d30dcf37657
(rmail-cease-edit): Restore the Rmail toolbar.
author | Eli Zaretskii <eliz@gnu.org> |
---|---|
date | Fri, 23 Feb 2007 20:00:31 +0000 |
parents | e3694f1cb928 |
children | 8e27d63c45eb dd7c098af727 |
comparison
equal
deleted
inserted
replaced
76105:470beaab19ed | 76106:1d30dcf37657 |
---|---|
118 (point))) | 118 (point))) |
119 (let ((old rmail-old-text)) | 119 (let ((old rmail-old-text)) |
120 (force-mode-line-update) | 120 (force-mode-line-update) |
121 (kill-all-local-variables) | 121 (kill-all-local-variables) |
122 (rmail-mode-1) | 122 (rmail-mode-1) |
123 (set (make-local-variable 'tool-bar-map) rmail-tool-bar-map) | |
123 (rmail-variables) | 124 (rmail-variables) |
124 ;; As the local value of save-buffer-coding-system is changed by | 125 ;; As the local value of save-buffer-coding-system is changed by |
125 ;; rmail-variables, we restore the original value. | 126 ;; rmail-variables, we restore the original value. |
126 (setq save-buffer-coding-system rmail-edit-saved-coding-system) | 127 (setq save-buffer-coding-system rmail-edit-saved-coding-system) |
127 (if (and (= (length old) (- (point-max) (point-min))) | 128 (if (and (= (length old) (- (point-max) (point-min))) |