diff options
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 37 |
1 files changed, 20 insertions, 17 deletions
diff --git a/src/buffer.c b/src/buffer.c index e9c3c47a959..6e3b39ad2bb 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1332,15 +1332,16 @@ See `kill-buffer'." | |||
| 1332 | */ | 1332 | */ |
| 1333 | DEFUN ("kill-buffer", Fkill_buffer, Skill_buffer, 1, 1, "bKill buffer: ", | 1333 | DEFUN ("kill-buffer", Fkill_buffer, Skill_buffer, 1, 1, "bKill buffer: ", |
| 1334 | doc: /* Kill the buffer BUFFER. | 1334 | doc: /* Kill the buffer BUFFER. |
| 1335 | The argument may be a buffer or may be the name of a buffer. | 1335 | The argument may be a buffer or the name of a buffer. |
| 1336 | An argument of nil means kill the current buffer. | 1336 | With a nil argument, kill the current buffer. |
| 1337 | 1337 | ||
| 1338 | Value is t if the buffer is actually killed, nil if user says no. | 1338 | Value is t if the buffer is actually killed, nil otherwise. |
| 1339 | 1339 | ||
| 1340 | The value of `kill-buffer-hook' (which may be local to that buffer), | 1340 | The functions in `kill-buffer-query-functions' are called with BUFFER as |
| 1341 | if not void, is a list of functions to be called, with no arguments, | 1341 | the current buffer. If any of them returns nil, the buffer is not killed. |
| 1342 | before the buffer is actually killed. The buffer to be killed is current | 1342 | |
| 1343 | when the hook functions are called. | 1343 | The hook `kill-buffer-hook' is run before the buffer is actually killed. |
| 1344 | The buffer being killed will be current while the hook is running. | ||
| 1344 | 1345 | ||
| 1345 | Any processes that have this buffer as the `process-buffer' are killed | 1346 | Any processes that have this buffer as the `process-buffer' are killed |
| 1346 | with SIGHUP. */) | 1347 | with SIGHUP. */) |
| @@ -5371,8 +5372,8 @@ This is the same as (default-value 'fill-column). */); | |||
| 5371 | This is the same as (default-value 'left-margin). */); | 5372 | This is the same as (default-value 'left-margin). */); |
| 5372 | 5373 | ||
| 5373 | DEFVAR_LISP_NOPRO ("default-tab-width", | 5374 | DEFVAR_LISP_NOPRO ("default-tab-width", |
| 5374 | &buffer_defaults.tab_width, | 5375 | &buffer_defaults.tab_width, |
| 5375 | doc: /* Default value of `tab-width' for buffers that do not override it. | 5376 | doc: /* Default value of `tab-width' for buffers that do not override it. |
| 5376 | This is the same as (default-value 'tab-width). */); | 5377 | This is the same as (default-value 'tab-width). */); |
| 5377 | 5378 | ||
| 5378 | DEFVAR_LISP_NOPRO ("default-case-fold-search", | 5379 | DEFVAR_LISP_NOPRO ("default-case-fold-search", |
| @@ -5694,9 +5695,9 @@ primitives `aref' and `aset' can be used to access elements of a char-table. | |||
| 5694 | Each of the char-table elements control how to display the corresponding | 5695 | Each of the char-table elements control how to display the corresponding |
| 5695 | text character: the element at index C in the table says how to display | 5696 | text character: the element at index C in the table says how to display |
| 5696 | the character whose code is C. Each element should be a vector of | 5697 | the character whose code is C. Each element should be a vector of |
| 5697 | characters or nil. nil means display the character in the default fashion; | 5698 | characters or nil. The value nil means display the character in the |
| 5698 | otherwise, the characters from the vector are delivered to the screen | 5699 | default fashion; otherwise, the characters from the vector are delivered |
| 5699 | instead of the original character. | 5700 | to the screen instead of the original character. |
| 5700 | 5701 | ||
| 5701 | For example, (aset buffer-display-table ?X ?Y) will cause Emacs to display | 5702 | For example, (aset buffer-display-table ?X ?Y) will cause Emacs to display |
| 5702 | a capital Y instead of each X character. | 5703 | a capital Y instead of each X character. |
| @@ -5827,7 +5828,7 @@ cursor type. */); | |||
| 5827 | ¤t_buffer->scroll_up_aggressively, Qnil, | 5828 | ¤t_buffer->scroll_up_aggressively, Qnil, |
| 5828 | doc: /* How far to scroll windows upward. | 5829 | doc: /* How far to scroll windows upward. |
| 5829 | If you move point off the bottom, the window scrolls automatically. | 5830 | If you move point off the bottom, the window scrolls automatically. |
| 5830 | This variable controls how far it scrolls. nil, the default, | 5831 | This variable controls how far it scrolls. The value nil, the default, |
| 5831 | means scroll to center point. A fraction means scroll to put point | 5832 | means scroll to center point. A fraction means scroll to put point |
| 5832 | that fraction of the window's height from the bottom of the window. | 5833 | that fraction of the window's height from the bottom of the window. |
| 5833 | When the value is 0.0, point goes at the bottom line, which in the simple | 5834 | When the value is 0.0, point goes at the bottom line, which in the simple |
| @@ -5840,7 +5841,7 @@ between 0.0 and 1.0, inclusive. */); | |||
| 5840 | ¤t_buffer->scroll_down_aggressively, Qnil, | 5841 | ¤t_buffer->scroll_down_aggressively, Qnil, |
| 5841 | doc: /* How far to scroll windows downward. | 5842 | doc: /* How far to scroll windows downward. |
| 5842 | If you move point off the top, the window scrolls automatically. | 5843 | If you move point off the top, the window scrolls automatically. |
| 5843 | This variable controls how far it scrolls. nil, the default, | 5844 | This variable controls how far it scrolls. The value nil, the default, |
| 5844 | means scroll to center point. A fraction means scroll to put point | 5845 | means scroll to center point. A fraction means scroll to put point |
| 5845 | that fraction of the window's height from the top of the window. | 5846 | that fraction of the window's height from the top of the window. |
| 5846 | When the value is 0.0, point goes at the top line, which in the simple | 5847 | When the value is 0.0, point goes at the top line, which in the simple |
| @@ -6031,7 +6032,7 @@ is a member of the list. */); | |||
| 6031 | Vinhibit_read_only = Qnil; | 6032 | Vinhibit_read_only = Qnil; |
| 6032 | 6033 | ||
| 6033 | DEFVAR_PER_BUFFER ("cursor-type", ¤t_buffer->cursor_type, Qnil, | 6034 | DEFVAR_PER_BUFFER ("cursor-type", ¤t_buffer->cursor_type, Qnil, |
| 6034 | doc: /* Cursor to use when this buffer is in the selected window. | 6035 | doc: /* Cursor to use when this buffer is in the selected window. |
| 6035 | Values are interpreted as follows: | 6036 | Values are interpreted as follows: |
| 6036 | 6037 | ||
| 6037 | t use the cursor specified for the frame | 6038 | t use the cursor specified for the frame |
| @@ -6056,11 +6057,13 @@ to the default frame line height. A value of nil means add no extra space. */) | |||
| 6056 | 6057 | ||
| 6057 | DEFVAR_PER_BUFFER ("cursor-in-non-selected-windows", | 6058 | DEFVAR_PER_BUFFER ("cursor-in-non-selected-windows", |
| 6058 | ¤t_buffer->cursor_in_non_selected_windows, Qnil, | 6059 | ¤t_buffer->cursor_in_non_selected_windows, Qnil, |
| 6059 | doc: /* *Cursor type to display in non-selected windows. | 6060 | doc: /* *Cursor type to display in non-selected windows. |
| 6060 | The value t means to use hollow box cursor. See `cursor-type' for other values. */); | 6061 | The value t means to use hollow box cursor. See `cursor-type' for other values. */); |
| 6061 | 6062 | ||
| 6062 | DEFVAR_LISP ("kill-buffer-query-functions", &Vkill_buffer_query_functions, | 6063 | DEFVAR_LISP ("kill-buffer-query-functions", &Vkill_buffer_query_functions, |
| 6063 | doc: /* List of functions called with no args to query before killing a buffer. */); | 6064 | doc: /* List of functions called with no args to query before killing a buffer. |
| 6065 | The buffer being killed will be current while the functions are running. | ||
| 6066 | If any of them returns nil, the buffer is not killed. */); | ||
| 6064 | Vkill_buffer_query_functions = Qnil; | 6067 | Vkill_buffer_query_functions = Qnil; |
| 6065 | 6068 | ||
| 6066 | DEFVAR_LISP ("change-major-mode-hook", &Vchange_major_mode_hook, | 6069 | DEFVAR_LISP ("change-major-mode-hook", &Vchange_major_mode_hook, |