diff options
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 15 |
1 files changed, 8 insertions, 7 deletions
diff --git a/src/buffer.c b/src/buffer.c index 5d2db83521e..d4c60f966cd 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -3850,7 +3850,7 @@ init_buffer_once () | |||
| 3850 | 3850 | ||
| 3851 | /* real setup is done in loaddefs.el */ | 3851 | /* real setup is done in loaddefs.el */ |
| 3852 | buffer_defaults.mode_line_format = build_string ("%-"); | 3852 | buffer_defaults.mode_line_format = build_string ("%-"); |
| 3853 | buffer_defaults.top_line_format = Qnil; | 3853 | buffer_defaults.header_line_format = Qnil; |
| 3854 | buffer_defaults.abbrev_mode = Qnil; | 3854 | buffer_defaults.abbrev_mode = Qnil; |
| 3855 | buffer_defaults.overwrite_mode = Qnil; | 3855 | buffer_defaults.overwrite_mode = Qnil; |
| 3856 | buffer_defaults.case_fold_search = Qt; | 3856 | buffer_defaults.case_fold_search = Qt; |
| @@ -3949,7 +3949,7 @@ init_buffer_once () | |||
| 3949 | XSETFASTINT (buffer_local_flags.indicate_empty_lines, 0x400000); | 3949 | XSETFASTINT (buffer_local_flags.indicate_empty_lines, 0x400000); |
| 3950 | XSETFASTINT (buffer_local_flags.scroll_up_aggressively, 0x800000); | 3950 | XSETFASTINT (buffer_local_flags.scroll_up_aggressively, 0x800000); |
| 3951 | XSETFASTINT (buffer_local_flags.scroll_down_aggressively, 0x1000000); | 3951 | XSETFASTINT (buffer_local_flags.scroll_down_aggressively, 0x1000000); |
| 3952 | XSETFASTINT (buffer_local_flags.top_line_format, 0x2000000); | 3952 | XSETFASTINT (buffer_local_flags.header_line_format, 0x2000000); |
| 3953 | 3953 | ||
| 3954 | Vbuffer_alist = Qnil; | 3954 | Vbuffer_alist = Qnil; |
| 3955 | current_buffer = 0; | 3955 | current_buffer = 0; |
| @@ -4097,10 +4097,10 @@ syms_of_buffer () | |||
| 4097 | "Default value of `mode-line-format' for buffers that don't override it.\n\ | 4097 | "Default value of `mode-line-format' for buffers that don't override it.\n\ |
| 4098 | This is the same as (default-value 'mode-line-format)."); | 4098 | This is the same as (default-value 'mode-line-format)."); |
| 4099 | 4099 | ||
| 4100 | DEFVAR_LISP_NOPRO ("default-top-line-format", | 4100 | DEFVAR_LISP_NOPRO ("default-header-line-format", |
| 4101 | &buffer_defaults.top_line_format, | 4101 | &buffer_defaults.header_line_format, |
| 4102 | "Default value of `top-line-format' for buffers that don't override it.\n\ | 4102 | "Default value of `header-line-format' for buffers that don't override it.\n\ |
| 4103 | This is the same as (default-value 'top-line-format)."); | 4103 | This is the same as (default-value 'header-line-format)."); |
| 4104 | 4104 | ||
| 4105 | DEFVAR_LISP_NOPRO ("default-abbrev-mode", | 4105 | DEFVAR_LISP_NOPRO ("default-abbrev-mode", |
| 4106 | &buffer_defaults.abbrev_mode, | 4106 | &buffer_defaults.abbrev_mode, |
| @@ -4187,7 +4187,8 @@ don't override it. This is the same as (default-value\n\ | |||
| 4187 | don't override it. This is the same as (default-value\n\ | 4187 | don't override it. This is the same as (default-value\n\ |
| 4188 | 'scroll-down-aggressively)."); | 4188 | 'scroll-down-aggressively)."); |
| 4189 | 4189 | ||
| 4190 | DEFVAR_PER_BUFFER ("top-line-format", ¤t_buffer->top_line_format, | 4190 | DEFVAR_PER_BUFFER ("header-line-format", |
| 4191 | ¤t_buffer->header_line_format, | ||
| 4191 | Qnil, | 4192 | Qnil, |
| 4192 | "Analogous to `mode-line-format', but for a mode line displayed\n\ | 4193 | "Analogous to `mode-line-format', but for a mode line displayed\n\ |
| 4193 | at the top of windows."); | 4194 | at the top of windows."); |