From: Po Lu <luangruo@yahoo.com>
Date: Tue, 9 Nov 2021 06:44:38 +0000 (+0100)
Subject: Make `kill_frame_xwidget_views' safe
X-Git-Tag: emacs-29.0.90~3671^2~47
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=e9ff21363931f1ab65c60534113aa31ba0773bab;p=emacs.git

Make `kill_frame_xwidget_views' safe

* src/xwidget.c (kill_frame_xwidget_views): Check XWIDGET_VIEW_P
(bug#51701).
---

diff --git a/src/xwidget.c b/src/xwidget.c
index 614eb46d932..90178f441d1 100644
--- a/src/xwidget.c
+++ b/src/xwidget.c
@@ -2388,7 +2388,8 @@ kill_frame_xwidget_views (struct frame *f)
   for (Lisp_Object tail = Vxwidget_view_list; CONSP (tail);
        tail = XCDR (tail))
     {
-      if (XXWIDGET_VIEW (XCAR (tail))->frame == f)
+      if (XWIDGET_VIEW_P (XCAR (tail))
+	  && XXWIDGET_VIEW (XCAR (tail))->frame == f)
 	rem = Fcons (XCAR (tail), rem);
     }