compat: adjust patches of modified functions
This commit is contained in:
parent
5f114503fc
commit
cdf9ae55fb
1 changed files with 2 additions and 1 deletions
|
|
@ -2641,6 +2641,7 @@ Emacs Everywhere is a great idea. Unfortunately, the default package on MELPA us
|
|||
(pcase emacs-everywhere--display-server
|
||||
(`(x11 . ,_) (emacs-everywhere--app-info-linux-x11))
|
||||
(`(wayland . KDE) (emacs-everywhere--app-info-linux-kde))
|
||||
(`(wayland . sway) (emacs-everywhere--app-info-linux-sway))
|
||||
(el-patch-add
|
||||
(`(wayland . Hyprland) (emacs-everywhere--app-info-linux-hyprland)))
|
||||
(_ (user-error "Unable to fetch app info with display server %S"
|
||||
|
|
@ -4071,7 +4072,7 @@ it defaults to `project-current'."
|
|||
(require 'dirvish-side)
|
||||
(let ((fullframep (when-let ((dv (dirvish-curr))) (car (dv-layout dv))))
|
||||
(visible (dirvish-side--session-visible-p))
|
||||
(path (or path (dirvish--get-project-root) default-directory)))
|
||||
(path (or path (dirvish--vc-root-dir) default-directory)))
|
||||
(cond (fullframep (user-error "Can not create side session here"))
|
||||
(visible (select-window visible))
|
||||
(t (dirvish-side--new path)))))
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue