diff options
Diffstat (limited to 'src/buffer.c')
| -rw-r--r-- | src/buffer.c | 16 |
1 files changed, 10 insertions, 6 deletions
diff --git a/src/buffer.c b/src/buffer.c index 9d8892a797a..10ac91915c6 100644 --- a/src/buffer.c +++ b/src/buffer.c | |||
| @@ -1,6 +1,6 @@ | |||
| 1 | /* Buffer manipulation primitives for GNU Emacs. | 1 | /* Buffer manipulation primitives for GNU Emacs. |
| 2 | 2 | ||
| 3 | Copyright (C) 1985-1989, 1993-1995, 1997-2021 Free Software Foundation, | 3 | Copyright (C) 1985-1989, 1993-1995, 1997-2022 Free Software Foundation, |
| 4 | Inc. | 4 | Inc. |
| 5 | 5 | ||
| 6 | This file is part of GNU Emacs. | 6 | This file is part of GNU Emacs. |
| @@ -1552,7 +1552,7 @@ This does not change the name of the visited file (if any). */) | |||
| 1552 | 1552 | ||
| 1553 | /* Catch redisplay's attention. Unless we do this, the mode lines for | 1553 | /* Catch redisplay's attention. Unless we do this, the mode lines for |
| 1554 | any windows displaying current_buffer will stay unchanged. */ | 1554 | any windows displaying current_buffer will stay unchanged. */ |
| 1555 | update_mode_lines = 11; | 1555 | bset_update_mode_line (current_buffer); |
| 1556 | 1556 | ||
| 1557 | XSETBUFFER (buf, current_buffer); | 1557 | XSETBUFFER (buf, current_buffer); |
| 1558 | Fsetcar (Frassq (buf, Vbuffer_alist), newname); | 1558 | Fsetcar (Frassq (buf, Vbuffer_alist), newname); |
| @@ -1562,6 +1562,9 @@ This does not change the name of the visited file (if any). */) | |||
| 1562 | 1562 | ||
| 1563 | run_buffer_list_update_hook (current_buffer); | 1563 | run_buffer_list_update_hook (current_buffer); |
| 1564 | 1564 | ||
| 1565 | call2 (intern ("uniquify--rename-buffer-advice"), | ||
| 1566 | BVAR (current_buffer, name), unique); | ||
| 1567 | |||
| 1565 | /* Refetch since that last call may have done GC. */ | 1568 | /* Refetch since that last call may have done GC. */ |
| 1566 | return BVAR (current_buffer, name); | 1569 | return BVAR (current_buffer, name); |
| 1567 | } | 1570 | } |
| @@ -6020,15 +6023,16 @@ specifies. */); | |||
| 6020 | 6023 | ||
| 6021 | DEFVAR_PER_BUFFER ("indicate-empty-lines", | 6024 | DEFVAR_PER_BUFFER ("indicate-empty-lines", |
| 6022 | &BVAR (current_buffer, indicate_empty_lines), Qnil, | 6025 | &BVAR (current_buffer, indicate_empty_lines), Qnil, |
| 6023 | doc: /* Visually indicate empty lines after the buffer end. | 6026 | doc: /* Visually indicate unused ("empty") screen lines after the buffer end. |
| 6024 | If non-nil, a bitmap is displayed in the left fringe of a window on | 6027 | If non-nil, a bitmap is displayed in the left fringe of a window |
| 6025 | window-systems. */); | 6028 | on graphical displays for each screen line that doesn't correspond |
| 6029 | to any buffer text. */); | ||
| 6026 | 6030 | ||
| 6027 | DEFVAR_PER_BUFFER ("indicate-buffer-boundaries", | 6031 | DEFVAR_PER_BUFFER ("indicate-buffer-boundaries", |
| 6028 | &BVAR (current_buffer, indicate_buffer_boundaries), Qnil, | 6032 | &BVAR (current_buffer, indicate_buffer_boundaries), Qnil, |
| 6029 | doc: /* Visually indicate buffer boundaries and scrolling. | 6033 | doc: /* Visually indicate buffer boundaries and scrolling. |
| 6030 | If non-nil, the first and last line of the buffer are marked in the fringe | 6034 | If non-nil, the first and last line of the buffer are marked in the fringe |
| 6031 | of a window on window-systems with angle bitmaps, or if the window can be | 6035 | of a window on graphical displays with angle bitmaps, or if the window can be |
| 6032 | scrolled, the top and bottom line of the window are marked with up and down | 6036 | scrolled, the top and bottom line of the window are marked with up and down |
| 6033 | arrow bitmaps. | 6037 | arrow bitmaps. |
| 6034 | 6038 | ||