From: Karl Heuer <kwzh@gnu.org>
Date: Thu, 25 May 1995 17:06:34 +0000 (+0000)
Subject: (Fframe_or_buffer_changed_p): Record frame names
X-Git-Tag: emacs-19.34~3939
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=bd9e3e75435e9a609051fab3eb8f1863143d4503;p=emacs.git

(Fframe_or_buffer_changed_p): Record frame names
as well as the frame objects.
---

diff --git a/src/dispnew.c b/src/dispnew.c
index fa78c95d50c..a1240cb7c6b 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -1920,10 +1920,15 @@ the current state.\n")
   Lisp_Object tail, frame, buf;
   Lisp_Object *vecp;
   int n;
+
   vecp = XVECTOR (frame_and_buffer_state)->contents;
   FOR_EACH_FRAME (tail, frame)
-    if (!EQ (*vecp++, frame))
-      goto changed;
+    {
+      if (!EQ (*vecp++, frame))
+	goto changed;
+      if (!EQ (*vecp++, XFRAME (frame)->name))
+	goto changed;
+    }
   /* Check that the buffer info matches.
      No need to test for the end of the vector
      because the last element of the vector is lambda
@@ -1957,7 +1962,10 @@ the current state.\n")
     frame_and_buffer_state = Fmake_vector (make_number (n), Qlambda);
   vecp = XVECTOR (frame_and_buffer_state)->contents;
   FOR_EACH_FRAME (tail, frame)
-    *vecp++ = frame;
+    {
+      *vecp++ = frame;
+      *vecp++ = XFRAME (frame)->name;
+    }
   for (tail = Vbuffer_alist; CONSP (tail); tail = XCONS (tail)->cdr)
     {
       buf = XCONS (XCONS (tail)->car)->cdr;