[Fvwm-crystal-commits] SF.net SVN: fvwm-crystal:[959] fvwm/components/functions

[<dom...@us...>]

Revision: 959
          http://sourceforge.net/p/fvwm-crystal/code/959
Author:   dominique_libre
Date:     2020-01-08 22:13:00 +0000 (Wed, 08 Jan 2020)
Log Message:
-----------
Fullscreen:  workaround buggy browser windows

Modified Paths:
--------------
    ChangeLog
    fvwm/components/functions/Fullscreen

Modified: ChangeLog
===================================================================
--- ChangeLog	2020-01-05 21:49:24 UTC (rev 958)
+++ ChangeLog	2020-01-08 22:13:00 UTC (rev 959)
@@ -1,5 +1,9 @@
 ChangeLog for FVWM-Crystal
 
+Mercredi 8 janvier 2020
+  fvwm/components/Fullscreen: workaround buggy browser windows which think they know
+  better that the window manager.
+
 dimanche 5 janvier 2020
   fvwm/scripts/launchwm
   fvwm/components/styles/Applications: Maximize Fullscreen doesn't work with a Xephyr window 

Modified: fvwm/components/functions/Fullscreen
===================================================================
--- fvwm/components/functions/Fullscreen	2020-01-05 21:49:24 UTC (rev 958)
+++ fvwm/components/functions/Fullscreen	2020-01-08 22:13:00 UTC (rev 959)
@@ -1,5 +1,5 @@
 # FVWM-Crystal: Fullscreen
-# Written by: Dominique Michel 2008-2019
+# Written by: Dominique Michel 2008-2020
 # <dom...@us...>
 # replace the Fullscreen functions written when fvwm did not have native Fs support.
 # but now (2019) fvwm have that support, so rewrite things around.
@@ -18,12 +18,35 @@
 #
 # The other window size functions are into Window-Buttons.
 
-# Fullscreen function {{{1
+# Fullscreen functions {{{1
+# Workaround: We need a wrapper because of buggy browser windowss which think they know better than the window manager.
 DestroyFunc Fullscreen
 AddToFunc Fullscreen
-+ I ThisWindow (!FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) Maximize Fullscreen
++ I ThisWindow (!FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) ToggleFullscreen
+#+ I ThisWindow (!FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) Maximize Fullscreeen
 
-# Disapear Wrapper function {{{1
+DestroyFunc PutInFSProp
+AddToFunc PutInFSProp
+# Needed by browsers on youtube
++ I WindowStyle !Borders, !Title
++ I UpdateStyles
++ I State 4 True
++ I Current Schedule Periodic 1000 $[w.id] ThisWindow (State 4, !Fullscreen) Maximize FullScreen True
+
+DestroyFunc PutOutFSProp
+AddToFunc PutOutFSProp
++ I WindowStyle Borders, Title
++ I UpdateStyles
++ I State 4 False
++ I Current Deschedule  $[w.id]
+
+DestroyFunc ToggleFullscreen
+AddToFunc ToggleFullscreen
++ I ThisWindow (Fullscreen) PutOutFSProp
++ I TestRc (NoMatch) PutInFSProp
++ I Maximize Fullscreen
+
+# Disapear functions {{{1
 DestroyFunc Disappear
 AddToFunc Disappear
 + I Next (CurrentPage, Fullscreen, Iconic) Disappear-Off
@@ -41,18 +64,22 @@
 + I WindowStyle Icon
 + I UpdateStyles
 
-# Rearrange in fullscreen
+# Rearrange in fullscreen {{{1
 DestroyFunc Fullscreen-Rearrange
 AddToFunc Fullscreen-Rearrange
-+ I All (CurrentPage, !Iconic, !FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) Maximize Fullscreen
++ I All (CurrentPage, !Iconic, !FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) ToggleFullscreen
+#+ I All (CurrentPage, !Iconic, !FvwmButtons, !FvwmPager, !FvwmMiniConsoleNeedsUniqueName, !QuakeConsoleNeedsUniqueName, !FvwmIconMan, !MPlayer) Maximize Fullscreen
 
-# Start in full screen at application statup
+# Start in full screen at application statup {{{1
 DestroyFunc Window-AutoFS
 AddToFunc Window-AutoFS
 PipeRead '$[FVWM_SYSTEMDIR]/scripts/FSApps'
 
+# Event {{{1
 DestroyModuleConfig FvwmEvent-Window-Fullscreen-Auto: *
 *FvwmEvent-Window-FullScreen-Auto: add_window Window-AutoFS
+*FvwmEvent-Window-FullScreen-Auto: destroy_window Current Deschedule  $[w.id]
+#*FvwmEvent-Window-FullScreen-Auto: destroy_window "Echo FE Current Deschedule  $[w.id]"
 Module FvwmEvent FvwmEvent-Window-Fullscreen-Auto
 
 # vim:ft=fvwm

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.