diff options
| author | Stefan Monnier <monnier@iro.umontreal.ca> | 2017-07-07 16:58:30 -0400 |
|---|---|---|
| committer | Stefan Monnier <monnier@iro.umontreal.ca> | 2017-07-07 16:58:30 -0400 |
| commit | 21ecda1045f45ba8468a6d1d4519527a18797f27 (patch) | |
| tree | ab86a686e5e44b989e1ba97d4fba2fe1a399cd91 /lisp/window.el | |
| parent | c24748ada08ffdb2921826f2b954a230e25d1d60 (diff) | |
| download | emacs-21ecda1045f45ba8468a6d1d4519527a18797f27.tar.gz | |
* lisp/window.el (display-buffer--special-action): Use a closure.
Diffstat (limited to 'lisp/window.el')
| -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." (let ((pars (special-display-p (buffer-name buffer)))) (when pars (list (list #'display-buffer-reuse-window - `(lambda (buffer _alist) - (funcall special-display-function - buffer ',(if (listp pars) pars))))))))) + (lambda (buffer _alist) + (funcall special-display-function + buffer (if (listp pars) pars))))))))) (defun display-buffer-pop-up-frame (buffer alist) "Display BUFFER in a new frame. |