procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Always cascade from toplevel frames on Haiku

Browse source 
* src/haikufns.c (haiku_create_frame): Cascade from toplevel
frames, since otherwise the positions are wrong anyway, and it
doesn't make sense to cascade from a frame that disappears when
it becomes deactivated.
This commit is contained in:
Po Lu 2022-04-11 07:45:37 +00:00
parent a6bfc3cb87
commit 7140b1e82d
1 changed files with 11 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
src/haikufns.c
View file

@ -582,6 +582,11 @@ haiku_create_frame (Lisp_Object parms)
else
cascade_target = NULL;
/* Always cascade from the most toplevel frame. */
while (cascade_target && FRAME_PARENT_FRAME (cascade_target))
cascade_target = FRAME_PARENT_FRAME (cascade_target);
parms = Fcopy_alist (parms);
Vx_resource_name = Vinvocation_name;
@ -624,6 +629,7 @@ haiku_create_frame (Lisp_Object parms)
f = make_frame_without_minibuffer (tem, kb, display);
else
f = make_frame (1);
XSETFRAME (frame, f);
f->terminal = dpyinfo->terminal;
@ -810,6 +816,11 @@ haiku_create_frame (Lisp_Object parms)
|| !FRAME_LIVE_P (XFRAME (parent_frame)))
parent_frame = Qnil;
/* It doesn't make sense to center child frames, the resulting
position makes no sense. */
if (!NILP (parent_frame))
window_prompting |= PPosition;
fset_parent_frame (f, parent_frame);
store_frame_param (f, Qparent_frame, parent_frame);