Merge pull request #5251 from iyefrat/emacs27

Remove remaining `Emacs27+` checks
This commit is contained in:
Henrik Lissner 2021-07-10 10:29:07 -04:00 committed by GitHub
commit b886b9a635
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
8 changed files with 24 additions and 54 deletions

View file

@ -612,18 +612,3 @@ Accepts the same arguments as `display-buffer-in-side-window'. You must set
(setq window--sides-shown t))
(window--display-buffer
buffer best-window 'reuse alist)))))))))
;;
;; Emacs backwards compatibility
(unless EMACS27+
(defadvice! +popup--set-window-dedicated-a (window)
"Ensure `window--display-buffer' respects `display-buffer-mark-dedicated'.
This was not so until recent Emacs 27 builds, where it causes breaking errors.
This advice ensures backwards compatibility for Emacs <= 26 users."
:filter-return #'window--display-buffer
(when (and (windowp window) display-buffer-mark-dedicated)
(set-window-dedicated-p window display-buffer-mark-dedicated))
window))