Mercurial > hg > xemacs-beta
comparison lisp/gnus/gnus-salt.el @ 175:2d532a89d707 r20-3b14
Import from CVS: tag r20-3b14
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:50:14 +0200 |
parents | 8eaf7971accc |
children |
comparison
equal
deleted
inserted
replaced
174:bb3568571b84 | 175:2d532a89d707 |
---|---|
948 The following commands are available: | 948 The following commands are available: |
949 | 949 |
950 \\{gnus-carpal-mode-map}" | 950 \\{gnus-carpal-mode-map}" |
951 (interactive) | 951 (interactive) |
952 (kill-all-local-variables) | 952 (kill-all-local-variables) |
953 (setq mode-line-modified "-- ") | 953 (setq mode-line-modified (cdr gnus-mode-line-modified)) |
954 (setq major-mode 'gnus-carpal-mode) | 954 (setq major-mode 'gnus-carpal-mode) |
955 (setq mode-name "Gnus Carpal") | 955 (setq mode-name "Gnus Carpal") |
956 (setq mode-line-process nil) | 956 (setq mode-line-process nil) |
957 (use-local-map gnus-carpal-mode-map) | 957 (use-local-map gnus-carpal-mode-map) |
958 (buffer-disable-undo (current-buffer)) | 958 (buffer-disable-undo (current-buffer)) |