*module-buttons-panel: (1x1, Icon "$[FVWM_CRYSTAL_PANEL_ICON_SIZE]/fvwm-crystal/panel_desktop.png", \
Action (Mouse 1) Popup panel-menu-desktop $[FVWM_CRYSTAL_MENU_POSITION], \
Action (Mouse 3) Exec exec fvwm-crystal.wallpaper)

DestroyMenu panel-menu-desktop
AddToMenu panel-menu-desktop
+ "Take screenshot" Exec exec $[FVWM_CRYSTAL_MAKE_SCREENSHOT]
+ "Change colorset" Popup panel-menu-colorset
+ "Remember wallpaper/colorset set" Exec exec fvwm-crystal.save
+ "%$[FVWM_CRYSTAL_PANEL_ICON_SIZE]/fvwm-crystal/panel_lock.png%Lock" Exec exec xlock
+ "Quit" Quit
+ "System" Popup panel-menu-desktop-system
+ "%$[FVWM_CRYSTAL_PANEL_ICON_SIZE]/fvwm-crystal/panel_desktop.png%Change wallpaper" Exec exec fvwm-crystal.wallpaper

DestroyMenu panel-menu-desktop-system
AddToMenu panel-menu-desktop-system
+ "X Kill" Exec exec xkill
+ "" TearMenuOff
+ "Restart fvwm-crystal" Read .fvwm2rc
+ "Restart modules" Read 03load-modules
+ "Recreate apps panel menus" Exec exec fvwm-crystal.apps-generator
+ "Reread styles" PipeRead `cat $[FVWM_USERDIR]/styles/[0-9][0-9]*`
+ "Identify window" Module FvwmIdent
+ "Change window style" Popup panel-menu-desktop-style


DestroyMenu panel-menu-desktop-style
AddToMenu panel-menu-desktop-style
+ "Revert original style" Pick DestroyWindowStyle
+ "" TearMenuOff
+ "NoTitle"     	Pick WindowStyle NoTitle
+ "Title"       	Pick WindowStyle Title
+ "TitleAtBottom"       Pick WindowStyle TitleAtBottom
+ "TitleAtLeft" 	Pick WindowStyle TitleAtLeft
+ "TitleAtRight"        Pick WindowStyle TitleAtRight
+ "TitleAtTop"  	Pick WindowStyle TitleAtTop
+ "!Borders"    	Pick WindowStyle !Borders
+ "Borders"     	Pick WindowStyle Borders
+ "FixedPosition"       Pick WindowStyle FixedPosition
+ "VariablePosition"    Pick WindowStyle VariablePosition
+ "FixedSize"           Pick WindowStyle FixedSize
+ "VariableSize"        Pick WindowStyle VariableSize
+ "ResizeOpaque"        Pick WindowStyle ResizeOpaque"
+ "ResizeOutline"       Pick WindowStyle ResizeOutline


DestroyMenu panel-menu-colorset
AddToMenu panel-menu-colorset
+ DynamicPopupAction Function generate-panel-menu-colorset

DestroyFunc generate-panel-menu-colorset
AddToFunc generate-panel-menu-colorset
+ I DestroyMenu recreate panel-menu-colorset
+ I AddToMenu panel-menu-colorset
+ I AddToMenu panel-menu-colorset "" TearMenuOff
+ I PipeRead 'for i in $FVWM_USERDIR/colorsets/*.colorset; do \
  name=$(basename "$i"); \
  sname=${name%%.colorset}; \
  echo \"AddToMenu panel-menu-colorset \'$sname\' Exec exec fvwm-crystal.colorset \'$sname\'\"; done'


