From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Wed, 1 Sep 2021 14:27:06 +0000 (+0200)
Subject: Filter out the `name' parameter in clone-frame
X-Git-Tag: emacs-28.0.90~1233
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c42bb9d75caeb94fc0223aab27a7819930288aef;p=emacs.git

Filter out the `name' parameter in clone-frame

* lisp/frame.el (clone-frame): Filter out the `name' parameter,
because two frames shouldn't have the same name and this will
lead to a warning.
---

diff --git a/lisp/frame.el b/lisp/frame.el
index f36a34db7d7..60234fc2ae9 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -798,7 +798,10 @@ also select the new frame."
   (interactive "i\nP")
   (if use-default-parameters
       (make-frame-command)
-    (let* ((default-frame-alist (frame-parameters frame))
+    (let* ((default-frame-alist (seq-filter
+                                 (lambda (elem)
+                                   (not (eq (car elem) 'name)))
+                                 (frame-parameters frame)))
            (new-frame (make-frame)))
       (unless (display-graphic-p)
         (select-frame new-frame))