From 3dd47bde7a87bef332bd53f3e73c8d2bc64910c8 Mon Sep 17 00:00:00 2001
From: Juri Linkov <juri@linkov.net>
Date: Thu, 27 Jan 2022 19:47:40 +0200
Subject: [PATCH] * lisp/frame.el (clone-frame): Filter out 'parent-id'
(bug#51883).
---
lisp/frame.el | 5 +++--
1 file changed, 3 insertions(+), 2 deletions(-)
diff --git a/lisp/frame.el b/lisp/frame.el
index 86c52dc4382..69119b4c24f 100644
--- a/lisp/frame.el
+++ b/lisp/frame.el
@@ -798,8 +798,9 @@ also select the new frame."
(windows (unless no-windows
(window-state-get (frame-root-window frame))))
(default-frame-alist
- (seq-remove (lambda (elem) (eq (car elem) 'name))
- (frame-parameters frame)))
+ (seq-remove (lambda (elem)
+ (memq (car elem) '(name parent-id)))
+ (frame-parameters frame)))
(new-frame (make-frame)))
(when windows
(window-state-put windows (frame-root-window new-frame) 'safe))
--
2.39.5