mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-21 05:21:37 -07:00
Code Issues Projects Releases Wiki Activity

Display override redirect frames in all workspaces on Haiku

Browse source 
* src/haiku_support.cc (class EmacsWindow): New field
`pre_override_redirect_workspaces'.
(BWindow_set_override_redirect): Set window to display on all
workspaces.
This commit is contained in:
Po Lu 2022-01-17 10:08:04 +00:00
parent c9d06d080b
commit 2fa1eced39
1 changed files with 4 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/haiku_support.cc
View file

@ -406,6 +406,7 @@ public:
bool menu_bar_active_p = false;
window_look pre_override_redirect_style;
window_feel pre_override_redirect_feel;
uint32 pre_override_redirect_workspaces;
EmacsWindow () : BWindow (BRect (0, 0, 0, 0), "", B_TITLED_WINDOW_LOOK,
B_NORMAL_WINDOW_FEEL, B_NO_SERVER_SIDE_WINDOW_MODIFIERS)
@ -3170,11 +3171,14 @@ BWindow_set_override_redirect (void *window, bool override_redirect_p)
w->pre_override_redirect_style = w->Look ();
w->SetFeel (kMenuWindowFeel);
w->SetLook (B_NO_BORDER_WINDOW_LOOK);
w->pre_override_redirect_workspaces = w->Workspaces ();
w->SetWorkspaces (B_ALL_WORKSPACES);
}
else
{
w->SetFeel (w->pre_override_redirect_feel);
w->SetLook (w->pre_override_redirect_style);
w->SetWorkspaces (w->pre_override_redirect_workspaces);
}
w->UnlockLooper ();