# Menu for controlling XScreenSaver

DestroyMenu /Screensaver
AddToMenu /Screensaver
+ DynamicPopupAction Function Screensaver-generator

DestroyFunc Screensaver-generator
AddToFunc Screensaver-generator
+ I DestroyMenu recreate /Screensaver
+ I AddToMenu /Screensaver
+ I AddToMenu /Screensaver '$[gt.Force suspend]' X xset dpms force suspend
+ I AddToMenu /Screensaver '$[gt.Activate]'	X xscreensaver-command -activate
+ I AddToMenu /Screensaver '$[gt.Lock screen]' X xscreensaver-command -lock
+ I AddToMenu /Screensaver '$[gt.Preferences]' X xscreensaver-command -prefs
+ I AddToMenu /Screensaver "" Nop
+ I PipeRead 'pidof xscreensaver > /dev/null && echo "AddToMenu /Screensaver \'$[gt.Stop screensaver]\' X xscreensaver-command -exit" || echo "AddToMenu /Screensaver \'$[gt.Start screensaver]\' X xscreensaver -nosplash"'

Test (x xscreensaver) AddToFunc StartFunction I Exec pidof xscreensaver || exec xscreensaver -nosplash

# vim:ft=fvwm
