diff options
| author | Richard M. Stallman <rms@gnu.org> | 1997-08-26 04:37:02 +0000 |
|---|---|---|
| committer | Richard M. Stallman <rms@gnu.org> | 1997-08-26 04:37:02 +0000 |
| commit | b57022b2a3c335340c12175e24c5a34216e4eae7 (patch) | |
| tree | 902a9a0125538723fc139ea925f5e62dcc770c3a /lisp | |
| parent | b18fff674d8a01b42db210688862e73103a402a0 (diff) | |
| download | emacs-b57022b2a3c335340c12175e24c5a34216e4eae7.tar.gz | |
(rmail-mode-1): Update the value for mode-line-modified.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/rmail.el | 5 |
1 files changed, 1 insertions, 4 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 55e2b01719b..26a50cc6045 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -836,10 +836,7 @@ Instead, these commands are available: ;; The one exception is when messages are copied into an Rmail mode buffer. ;; rmail-output-to-rmail-file enables auto save when you do that. (setq buffer-auto-save-file-name nil) - (if (boundp 'mode-line-modified) - (setq mode-line-modified "--- ") - (setq mode-line-format - (cons "--- " (cdr (default-value 'mode-line-format))))) + (setq mode-line-modified "--") (use-local-map rmail-mode-map) (set-syntax-table text-mode-syntax-table) (setq local-abbrev-table text-mode-abbrev-table)) |