aboutsummaryrefslogtreecommitdiffstats
path: root/src/buffer.c
diff options
context:
space:
mode:
Diffstat (limited to 'src/buffer.c')
-rw-r--r--src/buffer.c16
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
3Copyright (C) 1985-1989, 1993-1995, 1997-2021 Free Software Foundation, 3Copyright (C) 1985-1989, 1993-1995, 1997-2022 Free Software Foundation,
4Inc. 4Inc.
5 5
6This file is part of GNU Emacs. 6This 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.
6024If non-nil, a bitmap is displayed in the left fringe of a window on 6027If non-nil, a bitmap is displayed in the left fringe of a window
6025window-systems. */); 6028on graphical displays for each screen line that doesn't correspond
6029to 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.
6030If non-nil, the first and last line of the buffer are marked in the fringe 6034If non-nil, the first and last line of the buffer are marked in the fringe
6031of a window on window-systems with angle bitmaps, or if the window can be 6035of a window on graphical displays with angle bitmaps, or if the window can be
6032scrolled, the top and bottom line of the window are marked with up and down 6036scrolled, the top and bottom line of the window are marked with up and down
6033arrow bitmaps. 6037arrow bitmaps.
6034 6038