diff options
| author | Karoly Lorentey | 2007-01-01 17:38:32 +0000 |
|---|---|---|
| committer | Karoly Lorentey | 2007-01-01 17:38:32 +0000 |
| commit | 65e86587ab836aaa86b12ce30b219bcb4fcbaa06 (patch) | |
| tree | 7e13feee7387635f52df3613cf1bba4414781aab /src/buffer.c | |
| parent | 8c778e28bcf16b4baef6400a124ec2403941e940 (diff) | |
| parent | 1fc8c92b50100da709c94a0faa47deed5603634f (diff) | |
| download | emacs-65e86587ab836aaa86b12ce30b219bcb4fcbaa06.tar.gz emacs-65e86587ab836aaa86b12ce30b219bcb4fcbaa06.zip | |
Merged from emacs@sv.gnu.org.
Patches applied:
* emacs@sv.gnu.org/emacs--devo--0--patch-536
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-537
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-538
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-539
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-540
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-541
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-542
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-543
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-544
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-545
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-546
Update from erc--emacs--22
* emacs@sv.gnu.org/emacs--devo--0--patch-547
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-548
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-549
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-550
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-551
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-552
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-553
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-554
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-555
erc-iswitchb: Temporarily enable iswitchb mode
* emacs@sv.gnu.org/emacs--devo--0--patch-556
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-557
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-558
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-559
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-560
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-561
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-562
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-563
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-564
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-565
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-566
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-567
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-568
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-569
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-570
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-571
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-572
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-573
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-574
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-575
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-576
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-577
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-578
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-579
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-580
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-581
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-582
Merge from gnus--rel--5.10
* emacs@sv.gnu.org/emacs--devo--0--patch-583
Update from CVS
* emacs@sv.gnu.org/emacs--devo--0--patch-584
Fix admin/quick-install-emacs to work with recent versions of autoconf
* emacs@sv.gnu.org/gnus--rel--5.10--patch-171
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-172
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-173
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-174
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-175
Update from CVS: lisp/legacy-gnus-agent.el: Add Copyright notice.
* emacs@sv.gnu.org/gnus--rel--5.10--patch-176
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-177
Merge from emacs--devo--0
* emacs@sv.gnu.org/gnus--rel--5.10--patch-178
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-179
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-180
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-181
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-182
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-183
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-184
Update from CVS
* emacs@sv.gnu.org/gnus--rel--5.10--patch-185
Merge from emacs--devo--0
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-590
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 51 |
1 files changed, 27 insertions, 24 deletions
diff --git a/src/buffer.c b/src/buffer.c index 05555913c59..50203f1d25d 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1344,15 +1344,16 @@ See `kill-buffer'." | |||
| 1344 | */ | 1344 | */ |
| 1345 | DEFUN ("kill-buffer", Fkill_buffer, Skill_buffer, 1, 1, "bKill buffer: ", | 1345 | DEFUN ("kill-buffer", Fkill_buffer, Skill_buffer, 1, 1, "bKill buffer: ", |
| 1346 | doc: /* Kill the buffer BUFFER. | 1346 | doc: /* Kill the buffer BUFFER. |
| 1347 | The argument may be a buffer or may be the name of a buffer. | 1347 | The argument may be a buffer or the name of a buffer. |
| 1348 | An argument of nil means kill the current buffer. | 1348 | With a nil argument, kill the current buffer. |
| 1349 | 1349 | ||
| 1350 | Value is t if the buffer is actually killed, nil if user says no. | 1350 | Value is t if the buffer is actually killed, nil otherwise. |
| 1351 | 1351 | ||
| 1352 | The value of `kill-buffer-hook' (which may be local to that buffer), | 1352 | The functions in `kill-buffer-query-functions' are called with BUFFER as |
| 1353 | if not void, is a list of functions to be called, with no arguments, | 1353 | the current buffer. If any of them returns nil, the buffer is not killed. |
| 1354 | before the buffer is actually killed. The buffer to be killed is current | 1354 | |
| 1355 | when the hook functions are called. | 1355 | The hook `kill-buffer-hook' is run before the buffer is actually killed. |
| 1356 | The buffer being killed will be current while the hook is running. | ||
| 1356 | 1357 | ||
| 1357 | Any processes that have this buffer as the `process-buffer' are killed | 1358 | Any processes that have this buffer as the `process-buffer' are killed |
| 1358 | with SIGHUP. */) | 1359 | with SIGHUP. */) |
| @@ -5385,8 +5386,8 @@ This is the same as (default-value 'fill-column). */); | |||
| 5385 | This is the same as (default-value 'left-margin). */); | 5386 | This is the same as (default-value 'left-margin). */); |
| 5386 | 5387 | ||
| 5387 | DEFVAR_LISP_NOPRO ("default-tab-width", | 5388 | DEFVAR_LISP_NOPRO ("default-tab-width", |
| 5388 | &buffer_defaults.tab_width, | 5389 | &buffer_defaults.tab_width, |
| 5389 | doc: /* Default value of `tab-width' for buffers that do not override it. | 5390 | doc: /* Default value of `tab-width' for buffers that do not override it. |
| 5390 | This is the same as (default-value 'tab-width). */); | 5391 | This is the same as (default-value 'tab-width). */); |
| 5391 | 5392 | ||
| 5392 | DEFVAR_LISP_NOPRO ("default-case-fold-search", | 5393 | DEFVAR_LISP_NOPRO ("default-case-fold-search", |
| @@ -5461,13 +5462,13 @@ This is the same as (default-value 'fringe-cursor-alist'). */); | |||
| 5461 | &buffer_defaults.scroll_up_aggressively, | 5462 | &buffer_defaults.scroll_up_aggressively, |
| 5462 | doc: /* Default value of `scroll-up-aggressively'. | 5463 | doc: /* Default value of `scroll-up-aggressively'. |
| 5463 | This value applies in buffers that don't have their own local values. | 5464 | This value applies in buffers that don't have their own local values. |
| 5464 | This variable is an alias for (default-value 'scroll-up-aggressively). */); | 5465 | This is the same as (default-value 'scroll-up-aggressively). */); |
| 5465 | 5466 | ||
| 5466 | DEFVAR_LISP_NOPRO ("default-scroll-down-aggressively", | 5467 | DEFVAR_LISP_NOPRO ("default-scroll-down-aggressively", |
| 5467 | &buffer_defaults.scroll_down_aggressively, | 5468 | &buffer_defaults.scroll_down_aggressively, |
| 5468 | doc: /* Default value of `scroll-down-aggressively'. | 5469 | doc: /* Default value of `scroll-down-aggressively'. |
| 5469 | This value applies in buffers that don't have their own local values. | 5470 | This value applies in buffers that don't have their own local values. |
| 5470 | This variable is an alias for (default-value 'scroll-down-aggressively). */); | 5471 | This is the same as (default-value 'scroll-down-aggressively). */); |
| 5471 | 5472 | ||
| 5472 | DEFVAR_PER_BUFFER ("header-line-format", | 5473 | DEFVAR_PER_BUFFER ("header-line-format", |
| 5473 | ¤t_buffer->header_line_format, | 5474 | ¤t_buffer->header_line_format, |
| @@ -5530,8 +5531,8 @@ Decimal digits after the % specify field width to which to pad. */); | |||
| 5530 | 5531 | ||
| 5531 | DEFVAR_LISP_NOPRO ("default-major-mode", &buffer_defaults.major_mode, | 5532 | DEFVAR_LISP_NOPRO ("default-major-mode", &buffer_defaults.major_mode, |
| 5532 | doc: /* *Major mode for new buffers. Defaults to `fundamental-mode'. | 5533 | doc: /* *Major mode for new buffers. Defaults to `fundamental-mode'. |
| 5533 | nil here means use current buffer's major mode, provided it is not | 5534 | A value of nil means use current buffer's major mode, |
| 5534 | marked as "special". | 5535 | provided it is not marked as "special". |
| 5535 | 5536 | ||
| 5536 | When a mode is used by default, `find-file' switches to it | 5537 | When a mode is used by default, `find-file' switches to it |
| 5537 | before it reads the contents into the buffer and before | 5538 | before it reads the contents into the buffer and before |
| @@ -5561,7 +5562,7 @@ Interactively, you can set the buffer local value using \\[set-fill-column]. */ | |||
| 5561 | 5562 | ||
| 5562 | DEFVAR_PER_BUFFER ("left-margin", ¤t_buffer->left_margin, | 5563 | DEFVAR_PER_BUFFER ("left-margin", ¤t_buffer->left_margin, |
| 5563 | make_number (Lisp_Int), | 5564 | make_number (Lisp_Int), |
| 5564 | doc: /* *Column for the default indent-line-function to indent to. | 5565 | doc: /* *Column for the default `indent-line-function' to indent to. |
| 5565 | Linefeed indents to this column in Fundamental mode. */); | 5566 | Linefeed indents to this column in Fundamental mode. */); |
| 5566 | 5567 | ||
| 5567 | DEFVAR_PER_BUFFER ("tab-width", ¤t_buffer->tab_width, | 5568 | DEFVAR_PER_BUFFER ("tab-width", ¤t_buffer->tab_width, |
| @@ -5708,9 +5709,9 @@ primitives `aref' and `aset' can be used to access elements of a char-table. | |||
| 5708 | Each of the char-table elements control how to display the corresponding | 5709 | Each of the char-table elements control how to display the corresponding |
| 5709 | text character: the element at index C in the table says how to display | 5710 | text character: the element at index C in the table says how to display |
| 5710 | the character whose code is C. Each element should be a vector of | 5711 | the character whose code is C. Each element should be a vector of |
| 5711 | characters or nil. nil means display the character in the default fashion; | 5712 | characters or nil. The value nil means display the character in the |
| 5712 | otherwise, the characters from the vector are delivered to the screen | 5713 | default fashion; otherwise, the characters from the vector are delivered |
| 5713 | instead of the original character. | 5714 | to the screen instead of the original character. |
| 5714 | 5715 | ||
| 5715 | For example, (aset buffer-display-table ?X ?Y) will cause Emacs to display | 5716 | For example, (aset buffer-display-table ?X ?Y) will cause Emacs to display |
| 5716 | a capital Y instead of each X character. | 5717 | a capital Y instead of each X character. |
| @@ -5841,7 +5842,7 @@ cursor type. */); | |||
| 5841 | ¤t_buffer->scroll_up_aggressively, Qnil, | 5842 | ¤t_buffer->scroll_up_aggressively, Qnil, |
| 5842 | doc: /* How far to scroll windows upward. | 5843 | doc: /* How far to scroll windows upward. |
| 5843 | If you move point off the bottom, the window scrolls automatically. | 5844 | If you move point off the bottom, the window scrolls automatically. |
| 5844 | This variable controls how far it scrolls. nil, the default, | 5845 | This variable controls how far it scrolls. The value nil, the default, |
| 5845 | means scroll to center point. A fraction means scroll to put point | 5846 | means scroll to center point. A fraction means scroll to put point |
| 5846 | that fraction of the window's height from the bottom of the window. | 5847 | that fraction of the window's height from the bottom of the window. |
| 5847 | When the value is 0.0, point goes at the bottom line, which in the simple | 5848 | When the value is 0.0, point goes at the bottom line, which in the simple |
| @@ -5854,7 +5855,7 @@ between 0.0 and 1.0, inclusive. */); | |||
| 5854 | ¤t_buffer->scroll_down_aggressively, Qnil, | 5855 | ¤t_buffer->scroll_down_aggressively, Qnil, |
| 5855 | doc: /* How far to scroll windows downward. | 5856 | doc: /* How far to scroll windows downward. |
| 5856 | If you move point off the top, the window scrolls automatically. | 5857 | If you move point off the top, the window scrolls automatically. |
| 5857 | This variable controls how far it scrolls. nil, the default, | 5858 | This variable controls how far it scrolls. The value nil, the default, |
| 5858 | means scroll to center point. A fraction means scroll to put point | 5859 | means scroll to center point. A fraction means scroll to put point |
| 5859 | that fraction of the window's height from the top of the window. | 5860 | that fraction of the window's height from the top of the window. |
| 5860 | When the value is 0.0, point goes at the top line, which in the simple | 5861 | When the value is 0.0, point goes at the top line, which in the simple |
| @@ -6045,7 +6046,7 @@ is a member of the list. */); | |||
| 6045 | Vinhibit_read_only = Qnil; | 6046 | Vinhibit_read_only = Qnil; |
| 6046 | 6047 | ||
| 6047 | DEFVAR_PER_BUFFER ("cursor-type", ¤t_buffer->cursor_type, Qnil, | 6048 | DEFVAR_PER_BUFFER ("cursor-type", ¤t_buffer->cursor_type, Qnil, |
| 6048 | doc: /* Cursor to use when this buffer is in the selected window. | 6049 | doc: /* Cursor to use when this buffer is in the selected window. |
| 6049 | Values are interpreted as follows: | 6050 | Values are interpreted as follows: |
| 6050 | 6051 | ||
| 6051 | t use the cursor specified for the frame | 6052 | t use the cursor specified for the frame |
| @@ -6066,15 +6067,17 @@ this variable has no effect; the cursor appears as a hollow box. */); | |||
| 6066 | doc: /* Additional space to put between lines when displaying a buffer. | 6067 | doc: /* Additional space to put between lines when displaying a buffer. |
| 6067 | The space is measured in pixels, and put below lines on window systems. | 6068 | The space is measured in pixels, and put below lines on window systems. |
| 6068 | If value is a floating point number, it specifies the spacing relative | 6069 | If value is a floating point number, it specifies the spacing relative |
| 6069 | to the default frame line height. nil means add no extra space. */); | 6070 | to the default frame line height. A value of nil means add no extra space. */); |
| 6070 | 6071 | ||
| 6071 | DEFVAR_PER_BUFFER ("cursor-in-non-selected-windows", | 6072 | DEFVAR_PER_BUFFER ("cursor-in-non-selected-windows", |
| 6072 | ¤t_buffer->cursor_in_non_selected_windows, Qnil, | 6073 | ¤t_buffer->cursor_in_non_selected_windows, Qnil, |
| 6073 | doc: /* *Cursor type to display in non-selected windows. | 6074 | doc: /* *Cursor type to display in non-selected windows. |
| 6074 | t means to use hollow box cursor. See `cursor-type' for other values. */); | 6075 | The value t means to use hollow box cursor. See `cursor-type' for other values. */); |
| 6075 | 6076 | ||
| 6076 | DEFVAR_LISP ("kill-buffer-query-functions", &Vkill_buffer_query_functions, | 6077 | DEFVAR_LISP ("kill-buffer-query-functions", &Vkill_buffer_query_functions, |
| 6077 | doc: /* List of functions called with no args to query before killing a buffer. */); | 6078 | doc: /* List of functions called with no args to query before killing a buffer. |
| 6079 | The buffer being killed will be current while the functions are running. | ||
| 6080 | If any of them returns nil, the buffer is not killed. */); | ||
| 6078 | Vkill_buffer_query_functions = Qnil; | 6081 | Vkill_buffer_query_functions = Qnil; |
| 6079 | 6082 | ||
| 6080 | DEFVAR_LISP ("change-major-mode-hook", &Vchange_major_mode_hook, | 6083 | DEFVAR_LISP ("change-major-mode-hook", &Vchange_major_mode_hook, |