diff options
| author | Stefan Monnier | 2017-07-07 16:58:30 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2017-07-07 16:58:30 -0400 |
| commit | 21ecda1045f45ba8468a6d1d4519527a18797f27 (patch) | |
| tree | ab86a686e5e44b989e1ba97d4fba2fe1a399cd91 | |
| parent | c24748ada08ffdb2921826f2b954a230e25d1d60 (diff) | |
| download | emacs-21ecda1045f45ba8468a6d1d4519527a18797f27.tar.gz emacs-21ecda1045f45ba8468a6d1d4519527a18797f27.zip | |
* lisp/window.el (display-buffer--special-action): Use a closure.
| -rw-r--r-- | lisp/window.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/window.el b/lisp/window.el index 43e9e995953..2b979f46636 100644 --- a/lisp/window.el +++ b/lisp/window.el | |||
| @@ -7192,9 +7192,9 @@ See `display-buffer' for the format of display actions." | |||
| 7192 | (let ((pars (special-display-p (buffer-name buffer)))) | 7192 | (let ((pars (special-display-p (buffer-name buffer)))) |
| 7193 | (when pars | 7193 | (when pars |
| 7194 | (list (list #'display-buffer-reuse-window | 7194 | (list (list #'display-buffer-reuse-window |
| 7195 | `(lambda (buffer _alist) | 7195 | (lambda (buffer _alist) |
| 7196 | (funcall special-display-function | 7196 | (funcall special-display-function |
| 7197 | buffer ',(if (listp pars) pars))))))))) | 7197 | buffer (if (listp pars) pars))))))))) |
| 7198 | 7198 | ||
| 7199 | (defun display-buffer-pop-up-frame (buffer alist) | 7199 | (defun display-buffer-pop-up-frame (buffer alist) |
| 7200 | "Display BUFFER in a new frame. | 7200 | "Display BUFFER in a new frame. |