4058 |
|
|
4059 |
;;;; Desktop support |
;;;; Desktop support |
4060 |
|
|
|
;;;###autoload |
|
4061 |
(defun rmail-restore-desktop-buffer (desktop-buffer-file-name |
(defun rmail-restore-desktop-buffer (desktop-buffer-file-name |
4062 |
desktop-buffer-name |
desktop-buffer-name |
4063 |
desktop-buffer-misc) |
desktop-buffer-misc) |
4072 |
(kill-buffer (current-buffer)) |
(kill-buffer (current-buffer)) |
4073 |
nil))) |
nil))) |
4074 |
|
|
4075 |
|
(add-to-list 'desktop-buffer-mode-handlers |
4076 |
|
'(rmail-mode . rmail-restore-desktop-buffer)) |
4077 |
|
|
4078 |
(provide 'rmail) |
(provide 'rmail) |
4079 |
|
|
4080 |
;;; arch-tag: cff0a950-57fe-4f73-a86e-91ff75afd06c |
;;; arch-tag: cff0a950-57fe-4f73-a86e-91ff75afd06c |