Commit b1cb6b20 authored by Stefan Monnier's avatar Stefan Monnier

(make_terminal_frame): Yet Another Int/Lisp_Object Mixup.

(Fmodify_frame_parameters): Return a value.
parent 917ac1a9
......@@ -625,7 +625,7 @@ make_terminal_frame (struct terminal *terminal)
FRAME_VERTICAL_SCROLL_BAR_TYPE (f) = vertical_scroll_bar_none;
/* Set the top frame to the newly created frame. */
if (FRAME_TTY (f)->top_frame
if (FRAMEP (FRAME_TTY (f)->top_frame)
&& FRAME_LIVE_P (XFRAME (FRAME_TTY (f)->top_frame)))
XFRAME (FRAME_TTY (f)->top_frame)->async_visible = 2; /* obscured */
......@@ -2613,6 +2613,7 @@ enabled such bindings for that variable with `make-variable-frame-local'. */)
call1 (Qframe_set_background_mode, frame);
}
}
return Qnil;
}
DEFUN ("frame-with-environment", Fframe_with_environment, Sframe_with_environment, 0, 1, 0,
......
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