Mercurial > emacs
comparison lisp/man.el @ 20463:08329ac11410
(Man-mode-line-format): Update to include the new format
elements.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Wed, 17 Dec 1997 12:51:53 +0000 |
parents | 450fdcb00733 |
children | 25b02305130b |
comparison
equal
deleted
inserted
replaced
20462:d179de7ad92e | 20463:08329ac11410 |
---|---|
223 | 223 |
224 (defvar Man-awk-command "awk" | 224 (defvar Man-awk-command "awk" |
225 "Command used for processing awk scripts.") | 225 "Command used for processing awk scripts.") |
226 | 226 |
227 (defvar Man-mode-line-format | 227 (defvar Man-mode-line-format |
228 '("" mode-line-modified | 228 '("-" |
229 mode-line-buffer-identification " " | 229 mode-line-mule-info |
230 global-mode-string | 230 mode-line-modified |
231 " " Man-page-mode-string | 231 mode-line-frame-identification |
232 " %[(" mode-name mode-line-process minor-mode-alist ")%]----" | 232 mode-line-buffer-identification " " |
233 (-3 . "%p") "-%-") | 233 global-mode-string |
234 " " Man-page-mode-string | |
235 " %[(" mode-name mode-line-process minor-mode-alist "%n)%]--" | |
236 (line-number-mode "L%l--") | |
237 (column-number-mode "C%c--") | |
238 (-3 . "%p") "-%-") | |
234 "Mode line format for manual mode buffer.") | 239 "Mode line format for manual mode buffer.") |
235 | 240 |
236 (defvar Man-mode-map nil | 241 (defvar Man-mode-map nil |
237 "Keymap for Man mode.") | 242 "Keymap for Man mode.") |
238 | 243 |