X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Fdevice.c;h=dd98407248077789e0f2fe63e1adf6ea50cab99b;hb=debb7eb5baa3e6aae77e4fc0b7704887baf3006e;hp=de3c8df6da42586b0310a3b1e8f71d5961fa8004;hpb=77dcef404dc78635f6ffa8f71a803d2bc7cc8921;p=chise%2Fxemacs-chise.git

diff --git a/src/device.c b/src/device.c
index de3c8df..dd98407 100644
--- a/src/device.c
+++ b/src/device.c
@@ -76,7 +76,6 @@ Lisp_Object Qdevicep, Qdevice_live_p;
 Lisp_Object Qdelete_device;
 Lisp_Object Qcreate_device_hook;
 Lisp_Object Qdelete_device_hook;
-
 Lisp_Object Vdevice_class_list;
 
 
@@ -137,7 +136,7 @@ print_device (Lisp_Object obj, Lisp_Object printcharfun, int escapeflag)
 }
 
 DEFINE_LRECORD_IMPLEMENTATION ("device", device,
-			       mark_device, print_device, 0, 0, 0,
+			       mark_device, print_device, 0, 0, 0, 0,
 			       struct device);
 
 int
@@ -167,7 +166,7 @@ static struct device *
 allocate_device (Lisp_Object console)
 {
   Lisp_Object device;
-  struct device *d = alloc_lcrecord_type (struct device, lrecord_device);
+  struct device *d = alloc_lcrecord_type (struct device, &lrecord_device);
   struct gcpro gcpro1;
 
   zero_lcrecord (d);
@@ -883,6 +882,7 @@ behavior cannot necessarily be determined automatically.
 	  recompute_all_cached_specifiers_in_frame (f);
 	  MARK_FRAME_FACES_CHANGED (f);
 	  MARK_FRAME_GLYPHS_CHANGED (f);
+	  MARK_FRAME_SUBWINDOWS_CHANGED (f);
 	  MARK_FRAME_TOOLBARS_CHANGED (f);
 	  f->menubar_changed = 1;
 	}