From: Juri Linkov <juri@linkov.net>
Date: Mon, 15 Jul 2019 22:09:20 +0000 (+0300)
Subject: * lisp/frame.el (make-frame-on-display): Use x-display-list in completion.
X-Git-Tag: emacs-27.0.90~1884
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0746a9e275d6318be80dde39d7be72a447200612;p=emacs.git

* lisp/frame.el (make-frame-on-display): Use x-display-list in completion.

(Bug#29713)
---

diff --git a/lisp/frame.el b/lisp/frame.el
index 9402c15a56b..fd7e872fb6d 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -666,10 +666,7 @@ Return nil if we don't know how to interpret DISPLAY."
 The optional argument PARAMETERS specifies additional frame parameters."
   (interactive (list (completing-read
                       (format "Make frame on display: ")
-                      (delete-dups
-                       (mapcar (lambda (frame)
-                                 (frame-parameter frame 'display))
-                               (frame-list))))))
+                      (x-display-list))))
   (make-frame (cons (cons 'display display) parameters)))
 
 (defun make-frame-on-monitor (monitor &optional display parameters)