diff options
| author | Kristoffer Balintona | 2025-11-29 00:57:18 -0600 |
|---|---|---|
| committer | Sean Whitton | 2025-12-01 12:15:21 +0000 |
| commit | 1c3d37a67340df90403003f044ebb2056380d52a (patch) | |
| tree | e6725d4f9e7c228f2c1a0bf692516c9fb93c1b59 | |
| parent | fd3b74ca083216b1d8f644eb52caa8d39a9c807c (diff) | |
| download | emacs-1c3d37a67340df90403003f044ebb2056380d52a.tar.gz emacs-1c3d37a67340df90403003f044ebb2056380d52a.zip | |
log-edit-show-files: Respect display-buffer-alist
* lisp/vc/log-edit.el (log-edit-show-files): Consolidate the
call to cvs-pop-to-buffer-same-frame,
shrink-window-if-larger-than-buffer, and set-window-dedicated-p
into a single call to display-buffer.
| -rw-r--r-- | lisp/vc/log-edit.el | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/lisp/vc/log-edit.el b/lisp/vc/log-edit.el index bf706159cac..66d94cc3de1 100644 --- a/lisp/vc/log-edit.el +++ b/lisp/vc/log-edit.el | |||
| @@ -915,11 +915,12 @@ visible when the *vc-log* buffer pops up." | |||
| 915 | (cvs-insert-strings files) | 915 | (cvs-insert-strings files) |
| 916 | (special-mode) | 916 | (special-mode) |
| 917 | (goto-char (point-min)) | 917 | (goto-char (point-min)) |
| 918 | (save-selected-window | 918 | (display-buffer buf '((display-buffer-below-selected) |
| 919 | (cvs-pop-to-buffer-same-frame buf) | 919 | (dedicated . t) |
| 920 | (shrink-window-if-larger-than-buffer) | 920 | (window-height . shrink-window-if-larger-than-buffer) |
| 921 | (set-window-dedicated-p (selected-window) t) | 921 | (inhibit-same-window . t) |
| 922 | (selected-window))))) | 922 | (reusable-frames . nil) |
| 923 | (inhibit-switch-frame . t)))))) | ||
| 923 | 924 | ||
| 924 | (defun log-edit-empty-buffer-p () | 925 | (defun log-edit-empty-buffer-p () |
| 925 | "Return non-nil if the buffer is \"empty\"." | 926 | "Return non-nil if the buffer is \"empty\"." |