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

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

Revision: 1009
          http://sourceforge.net/p/fvwm-crystal/code/1009
Author:   dominique_libre
Date:     2020-02-20 14:44:31 +0000 (Thu, 20 Feb 2020)
Log Message:
-----------
Fullscreen: fix (De)Schedule command_id syntac causing nasty loops

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

Modified: ChangeLog
===================================================================
--- ChangeLog	2020-02-19 19:20:33 UTC (rev 1008)
+++ ChangeLog	2020-02-20 14:44:31 UTC (rev 1009)
@@ -49,6 +49,8 @@
   fvwm/components/functionsWindow-Decorations;
 + fvwm/decorations/*(/*)/Theme.amigaos-fullscreen: Implement the new
   button decoration
+  fvwm/components/Fullscreen: Fix Schedule/Deschedule command_id syntax
+  causing nasty loops.
 
 samedi 15 février 2020
   fvwm/components/functions/Fullscreen: add Navigator and Firefox into the

Modified: NEWS
===================================================================
--- NEWS	2020-02-19 19:20:33 UTC (rev 1008)
+++ NEWS	2020-02-20 14:44:31 UTC (rev 1009)
@@ -8,6 +8,8 @@
 
 - Fix media players styles after start and restart.
 - Use new exec name in the xmms2 audio player control.
+- Fullscreen function: fix nasty loops with the Schedule/Deschedule
+  of the stay in fullscreen browser workaround.
 
 Have fun!
 Dominique Michel

Modified: fvwm/components/functions/Fullscreen
===================================================================
--- fvwm/components/functions/Fullscreen	2020-02-19 19:20:33 UTC (rev 1008)
+++ fvwm/components/functions/Fullscreen	2020-02-20 14:44:31 UTC (rev 1009)
@@ -33,7 +33,7 @@
 + I WindowStyle !Borders, !Title
 + I UpdateStyles
 + I State 4 True
-+ I Current Schedule Periodic 1000 FS$[w.id] ThisWindow (State 4, !Fullscreen) Maximize FullScreen True
++ I Schedule Periodic 1000 $[w.id] ThisWindow (State 4, !Fullscreen) Maximize FullScreen True
 
 DestroyFunc PutOutFSProp
 AddToFunc PutOutFSProp
@@ -40,7 +40,7 @@
 + I WindowStyle Borders, Title
 + I UpdateStyles
 + I State 4 False
-+ I Current Deschedule FS$[w.id]
++ I Deschedule $[w.id]
 
 DestroyFunc ToggleFullscreen
 AddToFunc ToggleFullscreen

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