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)))