|
@@ -789,7 +789,9 @@ Raise an error when current buffer is not a source editing buffer."
|
|
(`other-window
|
|
(`other-window
|
|
(switch-to-buffer-other-window buffer))
|
|
(switch-to-buffer-other-window buffer))
|
|
(`split-window-below
|
|
(`split-window-below
|
|
- (select-window (split-window-vertically))
|
|
|
|
|
|
+ (if (eq context 'exit)
|
|
|
|
+ (delete-window)
|
|
|
|
+ (select-window (split-window-vertically)))
|
|
(pop-to-buffer-same-window buffer))
|
|
(pop-to-buffer-same-window buffer))
|
|
(`other-frame
|
|
(`other-frame
|
|
(pcase context
|
|
(pcase context
|