Hi,

Working with Fvwm-Crystal, I noticed than some functions I wrote are working
fine with Fvwm-2.5.30 but fails with 2.5.31.

SetEnv ThumbDirectory "/tmp"

DestroyFunc Fullscreen 
AddToFunc Fullscreen
+ I ThisWindow (State 19) Fullscreen-Stop
+ I TestRc (NoMatch) ThisWindow (!State 19) Fullscreen-Start

DestroyFunc Fullscreen-Start
AddToFunc Fullscreen-Start
+ I SetEnv "FSWindowWidth_$[w.id]"  "$[w.width]p"
+ I SetEnv "FSWindowHeight_$[w.id]" "$[w.height]p"
+ I WindowStyle !Title, !Borders, Iconifiable, ResizeHintOverride
+ I UpdateStyles
+ I State 19 True
+ I State 20 True
+ I Maximize ewmhiwa True 100 100
+ I WindowStyle !Maximizable, FixedSize
+ I UpdateStyles
# We need 1 temporary files for restoring the window state after restart
+ I Exec exec touch $[ThumbDirectory]/fullscreen.19.$[w.id].tmp

DestroyFunc Fullscreen-Stop
AddToFunc Fullscreen-Stop
+ I WindowStyle Title, Borders, Iconifiable, !ResizeHintOverride 
+ I WindowStyle Maximizable, !FixedSize
+ I State 19 False
+ I State 20 False
+ I Test (f $[ThumbDirectory]/fullscreen.19.$[w.id].tmp) Exec exec rm -f
$[ThumbDirectory]/fullscreen.19.$[w.id].tmp
+ I UpdateStyles
+ I Maximize True $[FSWindowWidth_$[w.id]] $[FSWindowHeight_$[w.id]]
+ I UnsetEnv "FSWindowWidth_$[w.id]"
+ I UnsetEnv "FSWindowHeight_$[w.id]"

# # #
I call Fullscreen with

Key KP_Multiply         A $[Mod1] Fullscreen

That is with plain Fvwm:

Key KP_Multiply         A M Fullscreen
# # #
When calling Fullscreen with Fvwm-2.5.30, the window that have the focus will
put in fullscreen without border. When call this function a second time, the
window will return to its preceding state and size.

When calling it from Fvwm-2.5.31, the window that have the focus will
put in fullscreen without border the first time, but it will remain in
fullscreen with all the following call to fullscreen.

Adding some Echo commands show me that the Fullscreen-Stop function will never
be executed.

This is on gentoo with portage ebuild and the following USE flags:
USE="bidi doc gtk2-perl netpbm nls perl png readline rplay stroke svg tk
truetype -debug -lock -vanilla -xinerama" 0 kB


-- 
If this message is send to an email list, please make sure to answer onto the
list, or you will be ignored.

"We have the heroes we deserve."

Reply via email to