Mercurial > emacs
comparison lisp/mh-e/mh-e.el @ 55151:b702b580608d
(mh-folder-mode): Bind desktop-save-buffer to t.
| author | Lars Hansen <larsh@soem.dk> |
|---|---|
| date | Mon, 26 Apr 2004 18:53:49 +0000 |
| parents | d8aac01c5fc7 |
| children | d36b00b98db0 4c90ffeb71c5 |
comparison
equal
deleted
inserted
replaced
| 55150:f78c7b75f616 | 55151:b702b580608d |
|---|---|
| 1546 | 1546 |
| 1547 \\{mh-folder-mode-map}" | 1547 \\{mh-folder-mode-map}" |
| 1548 | 1548 |
| 1549 (make-local-variable 'font-lock-defaults) | 1549 (make-local-variable 'font-lock-defaults) |
| 1550 (setq font-lock-defaults '(mh-folder-font-lock-keywords t)) | 1550 (setq font-lock-defaults '(mh-folder-font-lock-keywords t)) |
| 1551 (make-local-variable 'desktop-save-buffer) | |
| 1552 (setq desktop-save-buffer t) | |
| 1551 (mh-make-local-vars | 1553 (mh-make-local-vars |
| 1552 'mh-current-folder (buffer-name) ; Name of folder, a string | 1554 'mh-current-folder (buffer-name) ; Name of folder, a string |
| 1553 'mh-show-buffer (format "show-%s" (buffer-name)) ; Buffer that displays msgs | 1555 'mh-show-buffer (format "show-%s" (buffer-name)) ; Buffer that displays msgs |
| 1554 'mh-folder-filename ; e.g. "/usr/foobar/Mail/inbox/" | 1556 'mh-folder-filename ; e.g. "/usr/foobar/Mail/inbox/" |
| 1555 (file-name-as-directory (mh-expand-file-name (buffer-name))) | 1557 (file-name-as-directory (mh-expand-file-name (buffer-name))) |