File tree Expand file tree Collapse file tree 1 file changed +7
-3
lines changed Expand file tree Collapse file tree 1 file changed +7
-3
lines changed Original file line number Diff line number Diff line change @@ -1099,11 +1099,15 @@ switch."
1099
1099
1100
1100
(pm--move-overlays old-buffer new-buffer)
1101
1101
1102
- ; ; make sure we display in the same window as the old buffer (#337)
1103
- (let ((switch-to-buffer-obey-display-actions))
1104
- (switch-to-buffer new-buffer nil 'force-same-window ))
1102
+ (let ((strongly-dedicated-flag (window-dedicated-p )))
1103
+ (when strongly-dedicated-flag
1104
+ (set-window-dedicated-p nil nil ))
1105
+ (set-window-buffer nil new-buffer 'keep-margins )
1106
+ (when strongly-dedicated-flag
1107
+ (set-window-dedicated-p nil strongly-dedicated-flag)))
1105
1108
1106
1109
(bury-buffer-internal old-buffer)
1110
+ ; ; remove old-buffer form window-prev-buffers
1107
1111
(set-window-prev-buffers nil (assq-delete-all old-buffer (window-prev-buffers nil )))
1108
1112
1109
1113
; ; if header line is active in some modes, make it active everywhere
You can’t perform that action at this time.
0 commit comments