# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 782447563 0
# Node ID bcc9342cf633186b907a7af66710c95c3ae25f18
# Parent  2a5d9c96525fc70b1810f2a0062641b830a8086f
(x_set_unsplittable): New function.
(x_frame_parms): Add that function to the table.

diff -r 2a5d9c96525f -r bcc9342cf633 src/xfns.c
--- a/src/xfns.c	Tue Oct 18 02:19:25 1994 +0000
+++ b/src/xfns.c	Tue Oct 18 02:32:43 1994 +0000
@@ -638,6 +638,7 @@
 void x_set_visibility ();
 void x_set_menu_bar_lines ();
 void x_set_scroll_bar_width ();
+void x_set_unsplittable ();
 
 static struct x_frame_parm_table x_frame_parms[] =
 {
@@ -658,6 +659,7 @@
   "visibility", x_set_visibility,
   "menu-bar-lines", x_set_menu_bar_lines,
   "scroll-bar-width", x_set_scroll_bar_width,
+  "unsplittable", x_set_unsplittable,
 };
 
 /* Attach the `x-frame-parameter' properties to
@@ -1618,6 +1620,14 @@
 }
 
 void
+x_set_unsplittable (f, arg, oldval)
+     struct frame *f;
+     Lisp_Object arg, oldval;
+{
+  f->no_split = !NILP (arg);
+}
+
+void
 x_set_vertical_scroll_bars (f, arg, oldval)
      struct frame *f;
      Lisp_Object arg, oldval;