Commit eac358ef authored by Karl Heuer's avatar Karl Heuer

(x_set_unsplittable): New function.

(x_frame_parms): Add that function to the table.
parent 610c25c1
......@@ -638,6 +638,7 @@ void x_set_vertical_scroll_bars ();
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 @@ static struct x_frame_parm_table x_frame_parms[] =
"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
......@@ -1617,6 +1619,14 @@ x_set_autolower (f, arg, oldval)
f->auto_lower = !EQ (Qnil, arg);
}
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;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment